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PREFACE 



Product testing was performed on SCOPE 3.4 as a unified product set. The new 
features of each product are discussed in appropriate sections of this 
document. General points of interest are: 



The program libraries are numbered as follows. 



Section \ 



PL1 SCOPE 3.4 1 

PL2 COMPASS 3.0 2 

PL3 RECORD MANAGER 1.0 (including IS 2.0, DA 1.0, 3,4,5,26 

and 8-bit Subroutines) 

PL4 FORM 1.0 6 

PL5 CE Diagnostics 7 

PL6 Maintenance Tools 8 

PL7 FORTRAN Extended 4.0 Compiler 9 

PL8 FORTRAN Extended 4.0 Object Library 9 

PL9 COBOL 4.0 10 

PL10 SORT MERGE 4.0 11 

PL11 QUERY UPDATE 1.0, QUIDDL 1.0 12,13 

PL12 INTERCOM 4.1 14 

PL13 PERT/TIME 1.2 15 

PL14 SIMSCRIPT 1.5 2.0 16 

PL15 8231 IMPORT HS 1.0 17 

PL16 APT 2.2 18 

PL17 BASIC 2.0 19 

PL18 ALGOL 3.0 20 

PL19 SIMULA 1.0 21 

PL2 1700 MSOS IMPORT HS 1.0 22 

PL21 FORTRAN 2.3 (RUN) 23 

1700 IMPORT HS 1.0 24 

PL22 1700/274 IGS 2.0 25 

PL23 MARS 2.1 27 

PL24 241IGS 2.1 28 

♦♦♦WARNING*** 

The initial release of SCOPE 3.4 and product set supports 49K and larger 
central memory hardware configurations. 

Installation of the full product set cannot be accomplished on 32K 
configurations and performance of that portion of the product set which can be 
installed is not guaranteed. 



This product is intended for use only as described in this 
document. Control Data cannot be responsible for the proper 
functioning of undescribed features or undescribed parameters. 



60307400 C in 



PART I 



CONTENTS 



SCOPE VERSION 3.4 1-1-1 

Release Description 1—1 — 1 

Hardware Configuration 1-1-1 

Release Materials . 1-1-1 

Corrections 1-1-5 

Notes and Cautions 1-1-5 

Installation Procedures 1-1-6 

Installation Parameters 1-1-7 

IPARAMS 1-1-7 

CIOCOM 1-1-14 
CMR Configuration' 

Parameters ; 1-1-21 

Deadstart Panel Settings 1-1-34 

Main Deadstart Display 1-1-36 

ECS' Resident Library 1-1-35 
Installation Parameters - 

Permanent Files 1-1-41 

Scheduling Parameters 1-1-50 
Installation Parameters - 

ECS Usage 1-1-54 
Model Jobs for Creation 
of Installation Dead- 
start Tape 1-1-57 
Verification 'Program 1-1-63 



COMPASS VERSION 3.0 1-2-1 

Release Description: 1-2-1 

Release Materials 1-2-1 

Corrections 1-2-2 

General Description 1-2-2 

Installation Parameters 1-2-2 
Installation Procedures ■■- 1-2-3 



RECORD MANAGER VERSION 1.0 fl -3-1 

Release Description 1-3-1 

Release Materials 1-3-1 

Deficiencies 1-3-1 

Additional Information 1-3-1 

Installation Parameters 1-3-3 

Installation Procedures 1-3-4 



SCOPE INDEXED SEQUENTIAL 

VERSION 2.0 1-4-1 

Release Description 1-4-1 

Release Materials 1-4-1 
Modifications and 

Deficiencies 1-4-1 

Installation Parameters 1-4-2 

Installation Procedures 1-4-2 

Verification Programs 1-4-5 



SCOPE DIRECT ACCESS 

VERSION 1.0 1-5-1 

Release Description 1-5-1 

Release Materials 1-5-1 
Modifications and 

Deficiencies 1-5-1 

Installation Parameters 1-5-2 

Installation Procedures 1-5-2 

Verification Programs ,1-5-4 

FORM VERSION 1.0 1-6-1 

General Description 1-6-1 

Release Materials 1-6-1 

Hardware Configuration 1-6-1 

Installation Parameter 1-6-1 

Installation Procedures 1-6-1 

Verification Program 1-6-3 

CE DIAGNOSTICS 1-7-1 

Release Description 1-7-1 

Release Materials . 1-7-1 

New Features 1-7-1 

Corrections 1-7-1 

Installation Parameters 1-7-2 

Installation Procedures 1-7-2 



60307400 C 



MAINTENANCE TOOLS 



1-8-1 12 



QUERY UPDATE VERSION 1.0 



1-12-1 



Release Description 1-8-1 

Release Materials 1-8- 1 

General Description 1-8-2 

Installation Parameters 1-8-2 

Installation Procedures 1-8-2 

Verification Program 1-8-3 

Conversion Aids 1-8-8 

SIFT 1-8-8 

BBT06RM 1-8-8 

RANCONV 1-8-8 

SPY 1-8-8 

WHEN 1-8-8 

DOCK 1-8-8 

STIMULATOR 1-8-8 



FORTRAN EXTENDED 

VERSION 4.0 1-9-1 

Release Description 1-9-1 

Release Materials 1-9-1 

Modifications 1-9-1 
Corrections and 

Limitations 1-9-3 

Installation Parameters 1-9-5 

Installation Instructions 1-9-19 

Verification Program 1-9-25 



Release Description 
Release Materials 
Hardware Configuration 
General Description 
Installation Options 
Installation Procedures 
Verification Programs 



13 QUIDDL VERSION 1.0 

General Description 
Release Description 
Release Materials 
Limitations 

Installation Parameters 
Installation Procedures 
Verification Program 



10 COBOL VERSION 4.0 1-10-1 

Release Materials 1-10-1 

New Features 1-10-1 

Corrections 1-10-1 

Limitations 1-10-2 

Installation Parameters 1-10-2 

Installation Procedures 1-10-3 

Verification Program 1-10-5 



14 INTERCOM VERSION 4.1 

Release Description 

Hardware Configuration 

Modi f i cations 

Corrections 

General Procedures 

Installation Parameters 

INTERCOM Tape 

SCOPE Tape 

Command Table Structure 

EDITOR Installation 

Parameters 
MUJ Installation 

Parameters 
Installation Procedures 
Password File Creation 
Verification Procedure 



1-12-1 
1-12-1 
1-12-1 
1-12-1 
1-12-1 
1-12-2 
1-12-4 



1-13-1 

1-13-1 
1-13-1 
1-13-1 
1-13-1 
1-13-2 
1-13-2 
1-13-3 

1-14-1 

1-14-1 

1-14-1 

1-14-2 

1-14-4 

1-14-5 

1-14-5 

1-14-5 

1-14-10 

1-14-22 

1-14-25 

1-14-33 
1-14-18 
1-14-33 
1-14-38 



11 SORT/MERGE VERSION 4.0 

Release Description 
Release Materials 
New Features 
Modifications 
General Description 
Installation Procedure 
Verification Program 



1-1 1-1 15 PERT/TIME VERSION 1.2 



1-11-1 
1-11-1 
1-11-1 
1-11-2 
1-11-2 
1-11-2 
1-11-5 



1-15-1 

Release Description 1-15-1 

Release Materials 1-15-1 
Limitations and 

Corrections 1-15-1 

General Procedures 1-15-1 

Installation Parameters 1-15-1 

Installation Procedures 1-15-1 

Verification Program 1-15-5 



vx 



60307400 C 



16 



SIMSCRIPT VERSION 2.0 



l\ 



SIKU7.A VERSION 1.0 



1-2' 



Release Description 
Release Materials 
Corrections and 

Limitations 
Installation Parameters 
Installation Procedures 
Verification Proaram 



17 8231 IMPORT HS VERSION 1.0 

Release Description 
Release Materials 
Corrections 

Additional Information 
General Procedures 
Installation Parameters 
Installation Procedures 
Verification Program 



18 APT VERSION 2.2 

Release Description 
Release Materials 
Modifications 
Corrections 

Additional Information 
Installation Procedures 
Verification Program 



BAS I C VE RS ION 2 . 

Release Description 
Release Materials 
Corrections 

Additional Information 
Installation Parameters 
Installation Procedures 
Verification P roar am 



T- 


-16- 


-1 


Release Description 


1-21-1 


I" 


-16- 


-1 


Release Materials 
Corrections and 


Ir-21-1 


X" 


-16- 


_ t 
i 


Limitations 


1-21-1 


I- 


-16- 


-1 


General Procedures 


1-21-1 


I' 


-16- 


-1 


Installation Parameters 


.1-21-1 


I" 


-16- 


-3 


Installation Procedures 
verification Program 


Ir21-2 
1-21-3 


I- 


-17- 


-1 










22 1700 MSOS IMPORT. HS 




T, 


-17- 


-1 


VERSION 1 . 


1-22-1 


I- 


-17- 


-2 






I- 


-17- 


-2 


Release Description 


1-22-1 


I- 


-17- 


-2 


Release Materials 


1-22-1 


I- 


-17- 


-3 


Product Description 


1-22-1 


I- 


-17- 


-3 


Modifications and 




I" 


-17- 


-4 


Deficiencies 


1-22-4 


I- 


-17- 


-7 


Limitations 

Additional Information 
General Procedures 


1-22-4 
1-22-6 
1-22-7 


I- 


-18- 


= 1 


- Installation Procedures 
Installation Parameters 


1-22-7 
1-22-7 



1-18-1 
1-18-1 
1-18-1 
1-18-1 
1-18-1 
1-18-2 
1-18-3 



1-19-1 

1-19-1 
1-19-1 
1-19-1 
1-19-1 
1-19-1 
1-19-2 
1-19-4 



23 FORTRAN VERSION 2.3 1-23-1 

Release Description 1-23-1 

Release Materials 1-23-1 
Corrections and 

Limitations 1-23-1 

Installation Parameters 1-23-1 

Installation Procedures 1-23-3 

Verijl rcation Program T,—z.j~°d 



24- 1700 IMPORT HS. 

VERSION 1.0 1-24-1 



20 ALGOL-60 VERSION 3.0 1-20-1 

Release Description 1-20- 1 

Release Materials 1-20-1 

Modifications 1-20-1 
Corrections and 

Limitations 1-20-1 

Installation Parameters 1-20-2 

Installation Procedures 1-20-3 

Verification Program 1-20-5 



Release Description 1-24-1 

Hardware Configuration 1-24-1 

Release Materials 1-24-2 
Modifications and 

Corrections 1-24-3 

Additional Information 1-24-3 

General Procedures 1-24-4 

Installation Parameters 1-24-4 

Installation Options 1-24-5 

Installation Procedures 1-24-7 

Verification Program 1-24-9 



60307400 C 



vn 



25 1700/274 IGS VERSION 2.0 



1-25-1 



PART II TABLE FORMATS 



Release Description 


1-25-1 




Hardware Configuration 


1-25-1 


CONTENTS 


Release Materials 


1-25-1 




Limitations and 






Deficiencies 


1-25-2 




1700 IGS Installation 






Procedures 


1-25-2 




Locore Modifications 


1-25-3 




SYSBUF Modifications 


1-25-5 




Hexadecimal Patch 


1-25-7 




1700 IGS Binary 






Installation Package 


1-25-9 




Summary of Remote 






Activation Sequence 


1-25-13 





II-iii 



26 8-BIT SUBROUTINES 
VERSION 1.0 



1-26-1 



Release Description 1-26-1 

Release Materials 1-26-1 

Hardware Configuration 1-26-1 

General Description 1-26-1 

Installation Procedures 1-26-1 

Verification Programs 1-26-3 



27 MARS VI VERSION 2.1 



1-27-1 



Release Description 


1-27-1 


Hardware Requirements 


1-27-1 


Release Materials 


1-27-1 


Limitations 


1-27-1 


Installation Procedures 


1-27-2 


User Libraries 


1-27-3 


Verification Program 


1-27-4 


28 241-;IGS VERSION 2.1 


1-28-1 


Release Description 


1-28-1 


Hardware Configuration 


1-28-1 


Release Materials 


1-28-2 


New Features 


1-28-3 


Limitations 


1-28-3 


General Procedures 


1-28-4 


Installation Procedures 


1-28-4 


Verification Procedure 


1-28-13 


Terminal Operating 




Procedures 


1-28-13 


Deadstart Initialization 




Procedure 


1-28-14 


Normal Operating Mode 


1-28-15 



Vlll 



60307400 C 



INTRODUCTION 



1. Development and testing of SCOPE 3.4 was done on a variety of hardware 
configurations. The main configuration was a 131K 6600 which included the 
following major equipment. FCOs are listed in chronological order of 
installation: 



6613 Model D01 

20264B 

20811 

20252 

21543 

20738 

20437 

19964A 

20880 

20838 

22888 

21552 

21553 

23372B 

24263A 

25782 

21828 

26355 

26379 

24618 

22095 

3624, Revision 23 

1 ■ c-. 

2 

3 

24 thru 30 

33 thru 36 

8954 

9291 

11471 

13846 

16445 

19525 

21538 

21887 

26865 

19636 



D01 



6671 MUX 

19542 

20250 

20890 

20930 

22153 

23853 

21507 

6681 Model 

20922 

22190 

26904A 

29677 



6684 { DC211) Model A01 

22994 

26904A,02311B 

6639 Model BQ1/S.O. 10037 Model &Q3 

25311 

26904 

3553 (Fa705A) Model A02 

25999 

26333 

26574 

26676 

664 Model B01 



20742 

21365 

22366A 

23426 

23232 

25408 

24831 

27751 

22447A 



While equipment designations and FCO levels are not provided, testing was also 
done on a 65K 64 00 and selected CYBER models. 
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IX 



2. The full SCOPE 3.4 product set includes 11 system texts constructed from 
common decks included on the SCOPE and 6RM program libraries. Their 
source location and contents are shown below: 

ACT COM (SCOPE program library) 

System action request macro prototypes 

6 RMCOM (Record Manager program library) 

Record Manager user macro prototypes 

CPSYS (SCOPE program library) 
CPC 10 macro prototypes 

STATCOM (SCOPE program library) 

7000 Station symbol definitions 

IPARAMS (SCOPE program library) 
Installation parameters 

LMACOM (SCOPE program library) 
Loader macro prototypes 

PFCOM (SCOPE program library) 

Permanent file macro prototypes 

PPSYS (SCOPE program library) 

SCOPE symbol definitions and PP macro prototypes 

SCHCOM (SCOPE program library) 

Integrated scheduler macro prototypes 

RMCOM (Record Manager program library) 

Record Manager internal macro prototypes 

SISICOM (SCOPE program library) 
SIS 1.0 macro prototypes 

The following chart shows the combination of these common decks into the 
11 system texts required for full utilization of the SCOPE 3.4 product 
set. All these texts are fixed in content except SYSTEXT; as released, 
SYSTEXT will contain 6RMCOM which contains IS 2.0 macro prototypes. At 
installation option, SYSTEXT may contain SISICOM and CPSYS in lieu of 
6 RMCOM. 

The system texts are constructed as a part of the installation process 
discussed later in this document. 
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System 

Text 
Name 



SCOPE 3.«* System Texts 
Constituent COMDECKs 

IPARAMS STATCOM PFCOM LMACOM SCHCOM PPSYS CPSYS ACTCOM 6RMCOM RMCOM SISICOM 



IPTEXT X 

STATEXT X 

PFMTEXT X 

LDRTEXT X 

SCHTEXT X 

PPTEXT X 

SCPTEXT XXX 

TXT6RM XX 

IOTEXT XX 

CPCTEXT X X X 

SYSTEXT XX 

default 

SYSTEXT XX X 

alternate 

ALGTEXT and SMTEXT are installed when ALGOL and SORT/MERGE are installed. ALGTEXT is used 
only by ALGOL programs. COMPASS routines containing SORT/MERGE macros require 
specification of SMTEXT when assembled. 



3. 



Representative times for the various provided installation/ assembly decks 
are as follows when they are rim on a 131K 6600 in conjunction with other 
batch processing: 



DECK 

SCOPE1 

CMP1A 

SIXRM1 

IS1 

DA1 

BIT81 

FORM1 

CEDIAG1 

SYMPL1 

AIDS1 

CMAINT 

FTNLIB 

COBOL1 

SORT1 

QU1 

QODDL1 

INTCM1 

PERT 

SIMSC1 

APT1 

BASIC1 

ALGOL 1 

SIMDLA1 

V23RUN1 

MARS1 



Elapsed Minutes 

60 
12 
12 
15 

7 
12 

8 
15 
10 
10 
20 

8 
40 
15 
10 
10 
55 

5 
20 
23 

3 

8 
17 
10 
25 



CP Seconds 

1600 

90 
163 
215 

60 
222 
166 
223 

60 
126 
360 
140 
630 
160 
180 

80 
800 

45 
3 30 
243 

40 
180 
300 
150 
700 



The above table does not include times for the Version 3.0 Object Library or 
any of the Editlib decks. 



xn 
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Installation time can be shortened perceptibly by utilizing the system's 
multiprogramming capability. Due to the interdependent relationships 
involving Record Manager and FORTRAN Extended, the jobs required for their 
installation must be run before any of their dependent products can be 
installed. 

While not absolutely required for initial installation, maintenance mode 
installation involving introduction of PSR code dictates a prescribed order to 
ensure complete product set compatibility of relocatable binary and absolute 
binary overlays. 

Each of the following steps contain one or more jobs that can be run 
concurrently; all jobs in a step must run to completion before the next step 
can begin: 

A. Create FORTRAN Extended Compiler maintenance format tape using 
CINSTAL; assemble Record Manager using SIXRM1 , 

B. Replace Record Manager in the running system using SIXRM2; assemble 
FTN Compiler and FORM using CMAINT and FORM2. 

C. Add FTN Compiler and FORM to the running system using FTNC2 and 
F0RM2; assemble COBOL, SORT, and the 8- Bit Subroutines using C0B0L1 , 
SORT1, and BIT81. 

D. Add COBOL, SORT, and the 8-Bit Subroutines to the running system 
using C0B0L2 , SORT2, and BIT82; assemble FTN Library and IS using 
FTN4LIB and IS1. 

E. Add FTN Library and IS to the running system using LIB* and 182; 
assemble DA using DA1. 

F. Add DA to the running system using DA2; assemble SCOPE and INTERCOM 
using SCOPE1 and INTCM1. 

G. . Add INTERCOM to the running system using INTCM2; assemble QU using 

QUI. 

H. Add QU to the running system using QU2. 

I. Create a configured deadstart tape using SC0PE2. 

Deck AIDS1 must be run at step F or later but not before decks V23RUN1 and 
V23RUN2 have been run to install FORTRAN 23 (RUN) . Deck AIDS2 may then be run 
at any convenient time. 

Deck V3C0B1 may be run at step C or later. Deck V3COB2 may then be run at any 
convenient time. 

Deck SC0PE3 creates a configured deadstart tape from the running system. 
Execution of deck SCOPE3 at any time prior to step I will create an expanded 
though still unconfigured deadstart tape. 

Ml other products may be installed at any point in the sequence outlined 
above. 
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a... All release tapes provided for SCOPE 3.4 and its product set are available 

d'ecks'lLLT fn'thio ±n A eith % r 7 ' V 9 " track f " rmat - Se ins?Ina?i^ 
necks listed in this document and present on either the 7- or 9-track 
tapes are structured for use with the 7-track tapes. 

Ls?ana?ion a dLks S for r ?nl d ^t^o th ^ SC ? PE releaSG P acka 9 e which contains 
installation decks for the entire product set especially tailored for use at 
sites having only 9-track tape drives. e at 

5 ' delinefcoSen?s S^L^^k^ ^ Gate nine lib "ries. The following list 
product set a?e intefllf^^ 3 a f sundng a11 members of the sc °^ 3.4 

?oSs. t r .r^^^ i K t sSiL d^ a co^? I0 s: mes referencea shouid be 

The list is constructed in the order the products are installed for *h« 
Sunnyvale Development Center system. While listed here with all rfutin^ 
associated with each product shown in inclusive order, the PPLIB fETS ! 
deadstart tape is sorted in alphanumeric order by EDITLIB The <ZLl 

deadstart tape library files are not sorted. EDITLIB. The other 

PPLIB CM Resident Library 

Peripheral processor routines associated with SCOPE tntfr™m nv m* * • 

Conversion Aids, and one PP routine associated with 'of' Dia 9 nostlc ^ 






***SC0PE*** 
CEO 

* CEAOSTART * TDK 

* RECCROS * n 



*» *«**«««*««« 



OHT 

***SC0FE*** CCM 

CEA EST 

***CE DIAGNOSTICS*** TRF 

CES 



FC 

PH 

EJT 

MAF 

CM6 

MY1 

ALS 

FST 

CT3 

CUi 

ALX 



5CF 

5CQ 

SCR 

5CS 

5CT 

5CU 

5CV 

5CH 

P 

STL 

IRCP 

MTR 

DSC 



xiv 
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* * 

* fplie * 

* * 

*»♦ SCOPE 
8X9 
8Y9 
8XA 
8XB 
8XC 
8X0 
8XE 
8XF 
8XG 
8XH 
8X1 
8XJ 
8XK 
8XL 
8XM 
8XN 
6X0 
8XF 
8XQ 
8XR 
8Y6 
8YC 
8YC 
8YE 
8YF 
8YG 
8YH 
8YI 
80A 
8DE 
8DC 
80E 
8DF 
80H 
80K 
8DL 
80M 
800 
80F 
8CQ 
60R 
60S 
80T 
80X 
8CY 
802 
6EA 
8EE 
8EC 
8EE 
8EH 
8EJ 



*#* 

6QQQ RESIDENT OVERLAY 

7000 STATION ROUTINE 

C«D CONSOLE COMMAND OVERLAY 

0*0 CONSOLE COMMANO OVERLAY 

OSO CONSOLE COMMAND OVERLAY 

CSO CONSOLE COMMANO OVERLAY 

0*D CONSOLE COMMAND OVERLAY 

OSO CONSOLE COMMAND OVERLAY 

OSO CONSOLE COMMAND OVERLAY 

0*0 CONSOLE COMMANO OVERLAY 

OSO CONSOLE COMMANO OVERLAY 

OSO CONSOLE COMMAND OVERLAY 

OSO CONSOLE COMMAND OVERLAY 

0*0 CONSOLE COMMAND OVERLAY 

0*0 CONSOLE COMMANO OVERLAY 

OSD CONSOLE COMMAND OVERLAY 

OSO CONSOLE COMMAND OVERLAY 

0*0 CONSOLE COMMAND OVERLAY 

C*0 CONSOLE COMMANO OVERLAY 

OSO CONSOLE COMMAND OVERLAY 

7000 STATION ROUTINE 

7000 STATION ROUTINE 

7 00 STATION ROUTINE 

7 000 STATION ROUTINE 

7C00 STATION ROUTINE 

7000 STATION ROUTINE 

7000 STATION ROUTINE 

7 000 STATION ROUTINE 

OSO DISPLAY DRIVER 

OSO OISPLAY DRIVER 

CSO DISPLAY DRIVER 

OSO OISPLAY DRIVER 

OSO OISPLAY DRIVER 

OSD OISPLAY DRIVER 

OSO DISPLAY DRIVER 

OSO OISPLAY ORIVER 

OSO DISPLAY DRIVER 

OSO OISPLAY DRIVER 

OSO OISPLAY DRIVER 

OSD CISPLAY DRIVER 

OSD OISPLAY DRIVER 

OSO OISPLAY DRIVER 

DSD OISPLAY DRIVER 

DSD CISPLAY ORIVER 

DSD OISPLAY ORIVER 

DSO OISPLAY ORIVER 

7000 STATION ROUTINE 

7 000 STATION ROUTINE 

7 000 STATION ROUTINE 

7 000 STATION ROUTINE 

7000 STATION ROUTINE 

7000 STATION ROUTINE 



VERLAY 

VERLAY 

VERLAY 

VERLAY 

VERLAY 

VERLAY 

VERLAY 

VERLAY 

VERLAY 

VERLAY 

VERLAY 

VERLAY 

VERLAY 

VERLAY 

VERLAY 

VERLAY 

VERLAY 

VERLAY 
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xv 



8EP 7000 STATION ROUTINE 

8ES 7000 STATION ROUTINE 

8EZ 7000 STATION ROUTINE 

CIC CIRCULAR INPUT/OUTPUT 

MSG AOD MESSAGE TO OAYFILE 

1AJ AOVANCE JOBS 

7EC GENERATE ECS BUFFERS 

IPC CROP PERMANENT FILE MASS STORAGE 

PFC FERMANENT FILE CATALOG 

IFF PERMANENT FILE QUEUE MANAGER 

1FC CATALCG FUNCTION PART II 

FFA FERMANENT FILE ATTACH 

2FA UTILITY I/L PROCESSOR PFA SEGMENT 

LPF LCAO PERMANENT FILES 

FFF FERMANENT FILE PURGE 

FFE FERMANENT FILE EXTENO 

FFF PERMANENT FILE RENAME 

1FD PFA DELAY OVERLAY 

PFO FERMANENT FILE OUMP 

FFS FCSITION FUNCTION STORAGE ALLOCATION 

OFF OUMF FERMANENT FILES 

TFF TRANSFER PERMANENT FILES 

10U OUMPF INITIALIZATION 

TFT TRANSFER PERMANENT FILE TABLES 

1EJ EKD CF JOB PROCESSOR 

300 ALLCCATABLE DEVICE FILE CPEN _ 

1S5 INTERFACE BETWEEN STACK FROCESSOR MGR. AND iSP/300 

1RN RELEASE RECORD BLOCK CHAIN 

4ES ENTER STACK REQLESTS 

ISP STACK PROCESSOR MAIN PROGRAM 

3SP DRIVER OVERLAY FOR 6603-1 

3SG DRIVER OVERLAY FOR 6638 

3ST DRIVER OVERLAY FOR 6603-11 

3SR DRIVER OVERLAY FOR 8 65 

3SU DRIVER OVERLAY FOR 814 

3SV DRIVER OVERLAY FOR 821 

3SW DRIVER OVERLAY FOR 8 41 

3SS ORIVER OVERLAY FOR 854 

1EP STACK PROCESSOR MAIN PROGRAM-ECS I/O BUFFERING 

3EF ECS DRIVER OVERLAY FOR 6603-1 

3EC ECS DRIVER OVERLAY FOR 6638 

3ET ECS DRIVER OVERLAY FOR 6603-11 

3ER ECS DRIVER OVERLAY FOR 865 

3EU ECS DRIVER OVERLAY FOR 814 

3EV ECS DRIVER OVERLAY FOR 821 

3EW ECS DRIVER OVERLAY FOR 841 

3ES ECS DRIVER OVERLAY FOR 854 

1DL OVERLAY LOADER AND DAYFILE MESSAGE PROCESSOR FOR OSD 

dmp Sumach ™ PR0CESS C0NTR0L CA R°s entered at console 

1GM DISPLAY GOOD MORNING 

LCC LCAC OCTAL CORRECTIONS 

MEM PROCESS MEMORY FUNCTION 

REG REQUEST CARD PROCESSOR 

3R0 REQ OVERLAY CONTAINING 2TACOM 

IRQ REQ OVERLAY 

2TA TAPE ASSIGNMENT OVERLAY 

ACE CONTROL CARO READER 
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ilR JANUS MAIN PROGRAM 

IIS JANUS MAIN PROGRAM 

2IS JANUS ROUTINE 

1IQ INITIATE JANUS CONTROL FOINT 

1IU JANUS BACKSPACE PRINT NAME 

1RP ENO-GF-REEL SWAPPING 

2RP iRP OVERLAY 

1CL FILE CLOSE ROUTINE 

2TC CLOSE TAPE FILE 

1TC TAFE OPEN ROUTINE 

6TC OVERLAY TO 1TO 

iOF OPEN FILE ROUTINE (ALL FILES) 

OFE CFEN ROUTINE (DUMMY) 

CLC FILE CLOSE ROUTINE (DUMMY) 

50A FAMILY DISK PACK LABEL PROCESSOR 

iPK SEQUENTIAL PACK CLOSE 

3PK SEQUENTIAL PACK INITIALIZATION 

IDA DISK PACK LABEL ROUTINE 

EKG FAMILY PACK END OF JOB PROCESSOR 

SRE EDITLIB ROUTINE TO COMPLETE OISK ADORESS OF RECORO 

iET TAPE/DISK BLANK LABELS 

IDF DUMF CAYFILE ,.«..«. 

IMF MULTIFILE POSITION ROUTINE FOR ANSI LABELLED TAPES 

1MH DSD *MOTHER*S HaPER* 

iOM OEVICE QUEUE MANAGER 

VSN - VISUAL SERIAL NUMBER 

1LT LOAD JOBS FROM TAPE cToflMrcD ,.. Tap _ - nR 7 « T RACK TAPES 

iMT DRIVER FOR LONG RECORD STRANGER (L) TAPES FOR 7-TRAOK lAfts 

1P2 TAPE RECOVERY (WRITE ORIVER1 

1P<* TAPE RECOVERY (POSITIONING DRIVER) 

3PS 1F4 OVERLAY 

1P3 TAPE RECOVER (VERIFICATION DRIVER) 

3PO 1P3 OVERLAY 

iPi TAPE RECOVERY (POSITIONING DRIVER) 

3PM iFl OVERLAY 

iWI SCCPE TAPE WRITE DRI VER^FOR^ 7-TRACK TAPES 

iRV TAPE READ RECOVERY - INITIALIZATION 

iNO TAPE READ RECOVERY-NOISE RECORD-NOISE VERIFY 

6NC TAPE ERROR RECOVERY DEBUG SEGMENT 

1N2 TAPE READ RECOVERY-NOISE RECORD-REAO FORWARD 1 

1N3 TAPE READ RECOVERY-NOISE RECORD-READ FORWARD 2 

1R2 TAPE REAO RECOVERY -T APE PARITY ERROR REC 1 

iR3 TAPE READ RECOVERY -TAPE FARITY ERROR REC 2 

3R3 SEGMENT OF 1R3 LOADEO WHEN GO OR DROP DECISION NECESSARY BY OPERATOR 

1TF FORWARD SKIP ROUTINE FOR TAPE 

INS STRANGER (S) TAPE WRITE ORIVER 

1NW 9-TRACK S-FORMAT TAPE WRITE DRIVER 

8T3 SEGMENT FOR LOADING OF MMTC CONVERSION MEMORY 

2TB EACKHARD SKIP ROUTINE FOR TAPE 

iCR TAPE REAO RECOVERY -WRITE CM FOR S-FORMAT 9 -TR?CKTAPES 

iCT TAPE READ RECOVERY-WRITE CM FOR SCOPE FORMAT J-TRACK TAPES 

1CS TAPE READ RECOVERY-WRITE CM FOR S-FORMAT 7-TRACK TAPES 

1RT SCOPE TAPE READ DRIVER 

iRS STRANGER (S) TAPE READ DRIVER FOR 7-TRACK TAPES 

INF 9-TRACK S-FORMAT TAPE READ DRIVER 

lfc9 9-TRACK SCOPE FORMAT TAPE WRITE ORIVER 

iC9 TAPE REAO RECOVERY-WRITE CM FOR 9-TRACK SCOPE TAPES 

1R9 9-TRACK SCOPE FORMAT TAPE READ ORIVER 
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iPL PLOTTER PROGRAM (DUMMY) 

1SX PROCESS STACK PROCESSOR ERRORS 

1TO OUMP OUTPUT FILE TO TAPE 

ilB INITIATE A BATCH JOB 

1SI SWAPIN OR ROLLIN A JOB 

6SI OVERLAY TO PROCESS PARITY ERROR FOR 1SI 

ISO SHAPCUT OR ROLLOUT A JOE 

7T1 ANSI/OISPLAY COOE CONVERSION TABLE FOR MMTC MEMORY 

7T2 EBCOIC/OISPLAY CODE CONVERSION TABLE FOR MMTC MEMORY 

2LP ON-LINE PRINTER DRIVER 

2FC OK-LINE CARD PUNCH DRIVER 

2RC ON-LINE CARD READER DRIVER 

2TJ TRANSLATE JOB CARD 

*»LB TAPE LABEL PROCESSOR (ANSI) 

6ER klB OVERLAY 

6EW 4LE OVERLAY 

6LM LOAO FIELD NAME MESSAGES 

6LC LOAD CONVERSION TABLE INTO MMTC 

6L1 ^LB INLAY TO CONVERT PRU COUNT 

6L2 BCD CONVERSION TABLE INLAY FOR ^LB 

6L3 i»LB INLAY TO CHECK THAT PROPER CONVERSION TABLE IS IN THE MMTC 

6L4 4LB INLAY FOR DEBUG MESSAGE WRITER 

6L5 *LB INLAY TO FORMAT THE LABEL INFORMATION 

6L7 <*LB INLAY TO PACK AND WRITE LABEL TO TAPES TABLE 

4LC 3000 TYPE LABEL PROCESSOR 

6CR 3000 LABEL PROCESSOR REAC FUNCTION CODE OVERLAY 

6CW 3000 LABEL PROCESSOR WRITE FUNCTION CODE OVERLAY 

6WH DAYFILE MESSAGES FOR I/O REQUESTS 

7Wi OVERLAY TO 6WM 

7H2 OVERLAY TO 6WM 

CEM CENTRAL ERROR MANAGER 

ITS TAPE SAMPLER 

XRQ RESTORE QUEUE 

XCG DUMP QUEUE 

OSP PROCESS DISPOSE FUNCTION 

CKF TAPE CHECKPOINT 

CYi RESET FNT FOR RESTART 

RST RESTORE CONTROL POINT AREA FOR RESTART 

IRC RELOAD CORE FOR RESTART 

RPV PROCESS REPRIEVE FUNCTION 

STS STATUS ROUTINE 

JDF PROCESS JOB DEPENDENCY 

LDL LOADER UTILITY 

LDV AESOLUTE OVERLAY LOADER 

LOW AESOLUTE OVERLAY LOADER 

MDI MOVE SYSTEM OIRECTORY (EOITLIB USE) 

6MD DUMMY EOITLIB OVERLAY 

TDS TERMINATE OEAOSTART 

PRM PERMISSION CODE PROCESSOR FOR PERMANENT FILES 

RWE CHECK IF INTERCOM CONTROL POINT 

CON CONNECT FILE NAME TO TTY 

*** T^c D r^ N S-M ERHANENT FILE AU0IT INFORMATION 

12F MULTIPLEXOR ORIVER 

6ZF MULTIPLEXOR DRIVER 

92F MULTIPLEXOR ORIVER 

1XF HIGH SPEED EXPORT PROCESSOR 

2XF PROCESS SPECIAL DIRECTIVES 
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3XF PROCESS OUTPUT OATA STREAM 

5XF OUTPUT BANNER TO TERMINAL 

6XP OUTPUT LACED CARD 

4XF PROCESS INPUT DATA STREAM 

1XG GRAPHICS INPUT/OUTPUT PROCESSOR 

7XP ENO PROCESSING 

iLX LCC EXPORT PROCESSOR 

3LX OVERLAY TO ILX 

4LX OVERLAY TO iLX 

1WB INTERCOM V4 WIDE BAND DRIVER 

02Z INTERCOM LCC DRIVER INITIATOR 

iZZ INTERCOM LCC DRIVER 

9ZZ INTERCOM LCC DRIVER 

1CI COMMON COMMUNICATIONS INTERFACE 

3CU ASSIGN NEW USER TABLE 

3CI USER TABLE PROCESSOR 

3CT USER TABLE PROCESSOR 

3CX COMMAND PROCESSOR FOR 1CI 

3CF CLEAN UP PHASE OF iC I 

ill STARTS INTERCOM AT CONTROL POINT 

3TT REAO/WRITE FOR REMOTE TERMINAL 

3Ti REAO SEGMENT OF 3TT 

3T2 WRITE SEGMENT OF 3TT 

16R INTERCOM VR4 BUFFER MANAGER 

1QF MUJ PROCESSOR 

1GM 1GP OVERLAY 

iFT INTERCOM VR4 LOW SPEED EXPORT PROCESSOR 

8FT INPUT FILE TRANSMISSION 

9FT OUTPUT FILE TRANSMISSION 

1PJ PROCESS JOB CARD 

ilO SEND OAYFILE MESSAGE TO INTERCOM TERMINAL 

UN SENOS MESSAGES TO TERMINALS FROM PP ROUTINES 

IDS H DISPLAY GENERATOR FOR INTERCOM VR4 

T76 INTERCOM 4»i 7000 DISPLAY GENERATOR 

TBL INTERCOM VR<* TABLE TRANSMITTER 

FNT MODIFIES VR4 FNT ENTRY FOR BATCH AND DROPO 

IUF INITIATE USER PROGRAM 

IAP INITIATE ANOTHER PROGRAM 

MES MESSAGE TRANSFER ROUTINE 

2NE OVERLAY TO MES 

3KE OVERLAY TO MES 

MUJ MULTI-USER JOB INITIALIZATION 

MAC MUJ ACCOUNTING 

FAD FILE ATTACH/DETACH FOR MUJ 

GEJ EEGINS GRAPHICS MODE 

GEJ ENOS GRAPHICS MODE 

1GJ UFOATE IGS QUEUE WHEN IGS DATA STREAMS DEFINED 

2GJ FORMAT SCOPE ERROR MESSAGES FOR 274 IGS 

1GR 274 IGS RECOVERY 

* SOA *** 
MSD 

• AIDS *** 
VSM 

1VG 
SPY 
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»*» CE DIA6 ••• 
HTT 
9CA 
9CE 
9CC 
9C0 
9CE 
9CF 
90G 
LFT 
CFA 
96R 
9GQ 
«GS 
9GU 
9GV 
9GW 
9GX 
9GY 
9G2 
9G0 
9G1 
9G2 

9G3 

9G4 

9G5 

9G6 

9G8 

9G9 

DF7 

9K9 

9KA 

9K8 

9KE 

9KC 

9K0 

9KE 

9KF 

9K6 

9KG 

9K5 

9KH 

9K4 

9K3 

9KI 

9K2 

9Ki 

9K0 

9K7 



9KJ 
9K2 
9KY 
9KX 
9KK 
9KW 
9KL 
9K* 
9KN 
9K0 
9KF 
9KG 
9KR 
DF8 
8CA 
8CE 

ecc 
eco 

8CE 
8CF 
8CG 

ecu 

6CI 

8CJ 

8CK 

8CL 

8CM 

8C* 

8C0 

8CF 

8CQ 

SCR 

6CS 

8CT 

8CU 

LPi 

9IY 

917 

912 

918 

910 

919 

CF1 

CRi 

APR 

IEF 

RHS 

OLE 
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NUCLEUS 



CM Resident Library 



Routines callable by control card, including all compiler (0,0) overlays. 
COMPASS 3.0, LOADER, and EDITLIB non-0,0 overlays are included in NUCLEUS. 



** ♦♦♦****♦ 



* * 








* NUCLEUS* 








* * 








»* «*««««** 








*** SCOPE *** 


COPY 


**# 


6RM *»* 


PFCCP 


CCFY6F 




SYSTEXT 


LCADPF 


CCFYCF 




IGTEXT 


TRANSPF 


CCFYCR 




TXT6RM 


DUMPF 


CCFYER 




FILE 


REQUEST 


CCPYN 


♦♦ * 


FORTRAN *** 


RESTART 


CCPYSBF 




FTNMAC 


CCFYXS 


REMIND 




FTN 


SEGBILO 


UNLOAD 


•# * 


CCEOL *•* 


SEGRES 


RETURN 




CCEOL 


LCAO 


UPDATE 




CCPYCL 


LOADC 


SKIPB 


#* * 


SORT/MERGE »»» 


LCADM 


SKIPF 




SGRTMRG 


LGADU 


TRANSR 




SHTEXT 


LCADUC 


TRANSF 


** * 


INTERCOM *** 


LGADUM 


DISPOSE 




LOGIN 


UCLOAC 


RECCVR 




CONNECT 


LIERARY 


SYS.RM 




SITUATE 


L0A00 


AUDIT 




DISCCNT 


LOA001 


DMFECS 




BATCH 


LGADG2 


PFOUHP 




G 


LOAO03 


LCRTEXT 




PAGE 


CGNBINE 


PFMTEXT 




SENO 


XXXRESQ 


SCHTEXT 




LOGOUT 


XXXOMPG 


FFTEXT 




CONVERT 


EDITLIB 


SCFTEXT 




BRESEQ 


EDIT SYS 


CFCTEXT 




TEACH 


EDITUSR 


STATEXT 




FILES 


CCFYECD 


IP TEXT 




STORE 


LAEEL 


*** CE DIAG »•» 




DISCARO 


CCFYL 


CEDIAG 




FETCH 


LISTMF 


CERMS 




XEC 


CFC 


CEFAP 




PASSWRD 


IORANDM 


EC2 




ASSETS 


IC 


CM6 




REAO 


COMPARE 


MYi 




ERRORS 


CHEKPT 


ALS 




TESTLP 


TRAP 


FST 




EDITOR 


TRAPPER 


CT3 


** * 


SIS *** 


SETCORE 


cui 




ESTMATE 


BKSP 


ALX 




SISTAX 



*** SO A *** 

KYAN 

DCREATE 
*** 8 BIT ROUTINES »»* 

CCFY8P 
*** FORM *** 

FORM 
»*» QUERY/UPDATE *** 

CU 

QUI 

GU2 
*** QUIODL »** 

QUIOCL 
*** COMPASS *** 

C CMP ASS 

CCMP2S 
*** RUN »♦* 

RUN 
*** SYMPL *** 

SYMPL 
*** AIDS *** 

SIF 

CFSFYS 

OOCK 

WHEN 

BET06RM 

PRNTSPY 

CCNVPF 

RANCCNV 

SIFT 

DATAR 

SORT 

LEE 
*** EASIC *** 

BASIC 
*** ALGOL *** 

ALGOL 

ALGTEXT 
**» SIMULA »•* 

SIMULA 
*** SIMSCRIFT **« 

SIMS 
*** AFT *** 

AFT 
*** MARS »** 

MARS 
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xxi 



SYSOVL 



CM or Disk Resident Library 



Overlays other than (0,0) for the SCOPE 3.H product set, 
central source for all system overlay calls. 



This library is the 









* SYS0VL» 






* » 






«« **««*«*« 






*** FORTRAN *** 


*** SYMFL *** 


*♦» MARS *** 


LSTFROS 


SYHP10 


L0SV70 


PS1CTLS 


SYMP15 


LAGOE 


CLCSE2S 


SYMF16 


OEFSUB 


FTNMSGS 


SYMP17 


LAGLO 


F ASS 15$ 


SYMP13 


SGLINK2 


FASS14S 


SYMF3Q 


SRTMRG 


*** CCEOL *** 


SYMF31 


SCLINK3 


cceono 


SYMP32 


SCLUK** 


CCB0L11 


SYMP*»Q 


UF30 


CCE0L12 


SYMF5Q 


UF39 


C0B0L13 


SYMP51 


UF31 


C0BOLi<» 


SYMP52 


UF32 


CGE0L15 


*** ALGOL *»* 


UF33 


CCE0L16 


ALGO 


UF3<t 


CCEOL20 


ALG1 


UF35 


CCE0L21 


ALG2 


UF36 


CCB0L22 


ALG3 


UF37 


CCE0L23 


ALG*t 


UF38 


CCE0L24 


ALG5 


S0LINK9 


CCECL30 


»** SIMULA »•* 


RESOO 


♦*» SORT/MERGE *** 


SIMQ 


LAGRE 


SORTiO 


SIMi 


RESOi 


SORTii 


SIM2 


RES06 


S0RT12 


SIM 


RES015 


SGRT20 


SIM 


RES017 


SORT30 


SIM5 


RESO20 


S0RT31 


•»* AFT «** 


RES013 


S0RT33 


SECTNi 


RES02 


S0RT32 


0VER11 


RES03 


SORTIO 


OVER 12 


RESOIO 


*** QU »** 


CVER13 


RESO*» 


G6000 


OVER Hi 


RESOli 


07000 


0VER15 


RES012 


»** INTERCOM *** 


OVER16 


MASSUP 


ERFTN 


0VER17 


MASS51 


ERCOB 


OVER18 


MASS52 


ERRUN 


CVER19 


MASS53 


*•■•■ «UIBEL *»» 


CALSEC2 


MASS Sk 


QUODLiO 


ARLH2 


RFG60 


QUDDL2C 


POCKET 


RFG61 


*** RUN *»* 


RLOSR 


RFG62 


RUNi 


FCLCCN 


RPG63 


Q8DIAGF 


CALSEC3 
SECTNI 
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FORTRAN Disk Resident Library 

Object time routines for FORTRAN Extended 4.0 



** ******** 



* * 








* FORTRAN* 

* * 








********** 








*** FGRTRAN *** 


REAOEC 


DSGRT* 


MASK 


EACKSPs 


REMARK 


OTCO* 


CR 


EUFINs 


SLITE 


DTCD= 


SHIFT 


BUFIC- 


SSWTCH 


OTCI* 


AES 


BUF0UT= 


NRITEC 


CT0I = 


AIMAG 


ELSY 


ACCS 


OTCX* 


AINT 


CLCSMS 


ASIN 


DT0X= 


AMAXQ 


CONDIS 


ACCSIN= 


OTOZ» 


AMAX1 


DEC00E= 


ALCGs 


DTOZs 


AMINO 


ENCO0E= 


ALOG 


EXF 


AMIN1 


ENDFIL* 


ALCG10 


EXPs 


AMOO 


ECF 


ATAN 


HYFERB= 


CMFLX 


FORSYSs 


ATAN= 


ITCO* 


CONJG 


FTNBIN 


ATAN2 


ITCDs 


COUNT 


GETFITs 


ATAN2= 


ITOJ» 


DAES 


INFBs 


CAES 


ITCJs 


DELE 


INFC = 


CABS= 


ITOX* 


DIM 


IOCHEC 


CCOS 


ITCXs 


DMAX1 


KCCERs 


CC0S = 


ITOZ* 


DMIN1 


r«KrnCK* 


CEXP 


ITOZ = 


DSIGK 


LABEL 


CEXPs 


RANF 


FLOAT 


LENGTH 


CLOG 


RANSET 


IDIM 


NAMINs 


CLCG = 


SIN 


INT 


NAH0UT= 


CCS 


SINC0S= 


ISIGN 


OFENMS 


CCS=SIN 


SGRT 


MAXO 


OUTB = 


CSIN 


SORT* 


MAX1 


OUTC = 


CSIN= 


TAN 


MINO 


RANMS* 


CSGRT 


TANs 


MINI 


REAOMS 


CSQRTs 


TANH 


MCD 


RENINDs 


DATAN 


TANHs 


REAL 


STINDX 


0ATAN2 


XTCD* 


BUGARR 


SYSTEM 


DATAN= 


XTOOs 


BUGCLL 


UNIT 


DEXP 


XTGI* 


EUGCTL 


WRITMS 


DEXP = 


XTOI* 


EUGFUN 


XRCL 


DLNLOGs 


XTCY* 


BUGGTA 


CLCCK= 


DLCG 


XTCYs 


6UGST0 


OISPLA 


DLOG10 


XTCZ* 


6UGTRC 


DUMP 


CMOD 


XTOZs 


BLGTRT 


GCTOERs 


0HCD = 


ZTCI* 


DEGFIT 


LEGVAR 


DCCS 


ZTOIs 


FTNERR 


MCVLEV 


DSIN 


ANC 


TRACEX 


OVERLAY 


DSNC0S= 


CGMPL 




PAUSE* 


DSORT 


LOCF 
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I COBOL Disk Resident Library 

Object time routines for COBOL 4.0 and SORT/MERGE 4.0 



«* «**«*«*« 



• COECL * 

♦ * 

**♦ CGECL *** 
DDSUBMV 
CDCKETL 
DCCKLA 
DOWAIAB 
DCOPWA 
DDSQWA 
DORAKA 
CCFINIS 
CCCOBIC 
DOLABLS 
OCSQLAB 
DGKLLIT 
OCCMLIT 
DOSBLIT 
DD2PAR 
OGSQIO 
ODSTIC 
DCDAIO 
DDISIC 
OOUPCNT 
00A0VAN 
DOUSE 
COEXP 
DOANCM 
IFNUMA 
OOIFALP 
D0ALFC1 
OOSUESC 
DDSBSC2 
DDSBSER 
DDSBSC6 
D0SBSC7 
OOSOL 
00 SORT 
COCSPLY 
DDXCEPT 
00XCP7 
O0OA00 



DCFIVEO 


DCEXAHC 


CCNStAN 


DOMOVE 


DCTRUEL 


OOBCOCH 


0020NE 


DDSCM 


D02N3A 


C0NV1 


OC2N5A 


CBFAGE 


002N6A 


CCLNCT 


eeZNTAE 


OOSPACE 


STRPN 


OCINITL 


DOSTPTE 


DOFRIKT 


0CZN7A 


CCRGEN 


DOSTFiA 


OOBEGRP 


0DSTP2A 


DOENORF 


00STRP3 


*** SORT/MERGE **» 


O00ATCN 


OSMCCN 


COTENOP 


TSKCCN 


OOTENS 


MSKCCN 


D0TN1HS 


MCPRO 


COCVBO 


SOCHKR 


DBNiSA 


ENOPRO 


OOEN 


EXTRACT 


DEN6SA 


KYCPL 


0BM6SS 


KEYCOO 


BN10SA 


BUFALL 


OEN10S 


TRNSRT 


BN6DSA 


TSC 


0EN6DS 


TKC 


D6100A 


NEXRCM 


DEN100 


FMC 


DB600A 


FHIP 


0EN6CD 


FHOP 


DENiSB 


FSRTGET 


EN1SEA 


HRGCCN 


CCEO 


OCC 


ACFTN 


MRGOSN 


DOEDAL 


SRTCCN 


DOEOIT 


SRTPUT 


OOEOALP 


SRTGET 


DOEOP 
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RUN2P3 Disk Resident Library 
Object time routines for RUN 2.3 



* RUK2P3* 

***SCCFE*** 

R23RCVR FTNBIN 

»»» RLN *** ICINT 

RUNCALL INFUTN 

ACGOER IKFUTS 

DELE LENGTH 

EXF OUTFTN 

IEAIEX GUTPTS 

IMTMS CVERFL 

LEGVAR OVERLAY 

LCCF FALSE 

SINCOS RANF 

SNGL REAIEX 

SGRT REAREX 

SYSTEM READEC 

TAN REAOMS 

XRCL REMARK 

ALNLCG EACKSF 

ASINCOS BUFFEI 

ATAN EuFFEG 

ATAN2 CCNDIS 

CAES ENDFIL 

CEAIEX ICCHEC 

CCGS IFEKDF 

CEXF IMFUTB 

CLCG INFUTC 

CSIN ICCHEK 

CSGRT KCDEfi 

DAES KRAKER 

DATAN CUTPTE 

DEADEX OUTPTC 

GBAIEX REHINM 

CEXF SLITE 

DISFLA SLITET 

DLNLCG SSWTCH 

DMCD START 

GSIGK SIS=TIM 

DSINCOS TANH 

DSGRT TIME 

DUMP URITEC 

DVCHK WRITMS 
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I SYSIO Disk Resident Library 

SCOPE system I/O routines, 6000 Record Manager (6RM) , including the Direct 
Access (DA) and Indexed Sequential (IS) modules, other independent I/O 
routines available to the product set members plus the SYMPL and FORM object 
library routines. 



* * 

* SYSIC * 

* * 

*** efiK. *** 

LEUF.SQ 
SG.RH 
WA.RM 
IS.RH. 
DA.RM 
CIO.RM 
ERR.RM 
MGVE.RM 
CHWR.SG 
MCT.RM 
MEK6R* 
CHEK.RM 
CFEN.RH 
FCF.RH 
OFEN.SG 
CFEX.SQ 
OFEN.WA 
OPEN. IS 
0FEN.0A 
PUT.RM 
RLEQ.RH 
PUT.SG 
WAR.SQ 
PUT. HA 
CLSF.RM 
CLSF.SQ 
FLSM.SG 
CLSV.RM 
CLSV.SQ 
CLSF.WA 
CLSV.WA 
CLSF.IS 
\ CLSF.OA 
REW.RM 
REH.SG 
GET.RM 
GET.SQ 
Z.SQ 
R.SQ 
W.SQ 
DT.SQ 
FSU.SG 
BTRT.SG 
GET. HA 
PUTL.SG 
GETL.SG 



LXER.SQ 

ENDF.SG 

WECR.SG 

HTMK.SG 

DLT.RM 

CLT.SG 

DLT.WA 

SKFL.RM 

SKFF.SG 

SKFL.SG 

SKFL.HA 

GETN.RH 

GETN.SQ 

GETN.WA 

REFL.RM 

REFL.SG 

REFL.WA 

SEEK.RM 

SEEK.SC 

SEEK.WA 

SKEL.RM 

SKEL.SG 

SKFP.SG 

SKEL.WA 

HSG.RM 

R6RK.RM 

SIS *** 

ACCMKON 

BUFALOC 

DATM 

DIAGNOS 

FINDIT 

INCEXM 

ICMGR i 

PFCALL 

CE0I6RM 

HRIT6RM 

REGSAV 

SAAM.IS 

SISCLSE 

SISKEY 

SISOPEN 

SISRFV 

SISSEEK 

SISSKIF 

SIZES 

KHAKER 



GETFAR 
NEKCCNS 
FTNMAIN 
FEADCRD 
PRINTER 
NRER1 
OEFAULT 
ACCESS 
ACCPRCK 
CHKFET 
DELETE 
FCRCEW 
INSERT 
FTNCALL 
CFENKEW 
CFENCLO 
REPLACE 
REFOS 
SEEK 
SETELKD 
SETELKI 
SETCOLL 
SETERR 
SETKEY 
STFETFS 
STKEYFS 
TERMNAT 
*** SDA *** 
BINDSOA 
CLCSE 
SGJDEL 
D.DIAGN 
SCSFINO 
SCSGETN 
SDAHASH 
SDSADO 
D.INREC 
SCSIC 
SOJKEY 
RECHCM 
D.CPN 
CVFH 
SCSRFLC 
RETRY 
SDSRLCV 
SCARPVD 
SAAM.OA 



SOSSEEK 

SPACE 

SQUEEZE 

SEARCH 

SDSTRC 

FILEDA 

FILEIS 

FILESG 

FILEWA 

fjtcgm 

ERRFRCC 
CPNCLS 
GET 
PUT 
REFLC 
OLTE 
GETN 
SEEKF 
SKIP 
REHND 
GETP 
PUTF 
SCANCWA 
»♦* 6 EIT ROUTINES *•* 
T8.ERR 
XFACK 
XFANC 
XKCWE 
XCCMF 
TCCRACK 
T8.HXTB 
EDFTAB 
T8.6TAE 
XFILE 
XREAG 
XHRITE 
T8.CHK 
T8.FARS 
T8.CCM 
T8.TXT 
T8.CNC 
T8.CNT 
T8.CK6 
T8.NNA 
T8.TSTC 
T8.TSTT 
T8.TST6 



T8.NCH 

T8.MVB 

T8.C6. 

T8.CK6F 

T8.CN6T 

T8.CN6C 

T8.CNC6 

T8.CNT6 

T8.CNA 

»** FCRM *»« 
FHSBOEF 
FMSCRCR 
FHSECON 
FMJGAL 
FMSREF 
FM$FRT 
FMSSCAN 
FHSECIA 
FMSSEQ 
FMSCON 
FMSFCRM 
FMSCCNV 
FfSTfcOV 
FKSKOO 
FHSXX3 
FPSTFX3 
FHSTFK3 
FKSTFL3 
FKSTET3 
FHSTXXE 
FM$TFX6 
FMSTFK6 
FMJTFL6 
FMSTBT6 

*** RUN2F3 *** 
GETBA 
SIC$ 

*** SYKFL . *** 
SYMHBSS 
SYMBSHS 
SYMIO 
SYKSMS 
SYHSCS 



XXVI 
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SYSMISC Disk Resident Library 



Object time routines for BASIC, ALGOL, SIMULA and SIMSCRIPT. Additionally, 
the FTN 3.0, COBOL 3.0 and SORT/MERGE 3.0 object time routines appear in 
SYSMISC if they are installed. 



♦SYSMISC * 

♦♦♦SCOPE*** 
F30RCVR 
*** BASIC *** 
BASOGEN 
BASEGEN 
BASIGEN 
BASIINP 

BASATRI 

EASAATN 

EASALEF 

EASARST 

BASMCPR 
*** ALGOL *** 

ALGORUN 

ALGLEQO 

ALGLBQ1 

ALGLB02 

ALGL603 

ALGL604 

ALGLB05 

ALGLB06 

ALGLE07 

ALGLB10 
*** SIMULA *** 

SIMURUN 

SIMLEOO 

SIMLB01 

SIMLB02 

SIKLE03 

5IMLB05 
*♦♦ SIMSCRIPT *\ 

XXINIT 

XXERR 

ERRLF 

KXXOAT 

XXCNVHi 

XXGARGi 

XXTi 

XXBSR 

XXSKR 

XXREWi 

XXBSF 

XXCPEN 

XXNEF1 

XXINPi 

XXLINKi 

XXMEMi 

XXCUTPi 

XXCNMH1 

GRANO 

FRTIHE 



XXKAINS 


AMODS 


0EXFS 


XXTMR 


MOOS 


OEXPE 


CRAOS 


AMAXOS 


OLNLOGE 


GETPUT 


AKAX1S 


DLOGS 


FILREMV 


MAXOS 


0LGG1QS 


XXSTEP 


MAX1S 


OMOOS 


XXBIN 


0MAX1S 


DMCDE 


XXEOUT 


AKINOS 


CSINS 


*** FTN3P0 *** 


APIN1S 


DSNCCSE 


SYSTEMS 


MINGS 


DSORTS 


ACGOERS 


MINIS 


CSGRTE 


EACKSPS 


0HIN1S 


DTOOS 


BUFFEIS 


FLOATS 


DTCOE 


EUFFEOS 


IFIXS 


OTCIS 


EUGARRS 


ISIGNS 


07CIE 


BUGCLLS 


SIGNS 


DTOXS 


EUGCTLS 


D SIGNS 


DTOXE 


EUGFLNS 


OIKS 


CTC2S 


EUGGTAS 


IOIMS 


DT02E 


EUGSTOS 


SNGLS 


DISPLAS 


BUGTRCS 


REALS 


EXF$ 


EUGTRTS 


AINAGS 


EXFE 


CONOISS 


' 06LES 


HYFERBE 


OBGFETS 


CNFLXS 


ITCDS 


DUMPS 


%< V ■* w w 


T trine 


EhOFILS 


SHIFTS 


ITOJS 


FTNBINS 


ACOSS 


ITOJE 


FTNERRS 


ALKLOGE 


ITCXS 


IFENCFS 


ALOGS 


ITOXE 


IMTHSS 


ALOG10S 


ITOZS 


INPUTBS 


ANOS 


IT02E 


INFUTCS 


ASINS 


LABELS 


INFUTNS 


ASNCOSE 


LEGVARS 


IKFUTSS 


ATANS 


LOCFS 


IQCHECS 


ATAMC 


rtctf 


iccHli<i 


ATAN2S 


CVERLAS 


KODERS 


ATAN2E 


PAUSES 


KRAKERS 


CAESS 


RANOCME 


LENGTHS 


CA6SE 


RANFS 


MASKS 


CCOSS 


RANGETS 


OUTPTBS 


CCOSE 


RANSETS 


CUTPTCS 


CEXPS 


REMARKS 


OUTPTNS 


CEXPE 


SEGMENS 


OUTPTSS 


CLOGS 


SINS 


REAOECS 


CLOGE 


SINCOSE 


READKSS 


CO MPLS 


SLITES 


RE MI KM S 


coss 


SLITETS 


TRACEXS 


CCSESIN 


SORTS 


WRITECS 


CSINS 


SGRTE 


WRITMSS 


CSINE 


SSWTCHS 


ABSS 


CSQRTS 


TANS 


IAESS 


CSGRTE 


TANE 


OAESS 


DATANS 


TANHS 


AINTS 


DATAN2S 


TANHE 


INTS 


DATANE 


TIMES 


IQINTS 


ocoss 


X70DS 



XTODE 
XTCIS 
X7CIE 
XTCYS 
XTOYE 
XTC2S 
XTOZE 
2TCIS 
2TCIE 
♦♦* COE0L3P0 *** 
OGSUSMV 
DCCOBIO 
DCEXF 
DOANCM 
DCSUESC 
OCSOL 
OCSORT 
FINIS 
OCDSFLY 
OCXCEPT 
DOOAOO 
OCFIVEO 
OOTRUBL 
0020KE 
CCSTRF 
DOCATCN 
COTE NOP 
DOTENS 
OOTNTHS 

oocvec 

COBN 
DDEO 
DCEOAL 
OCEDIT 
uucunir 
DOEOP 
DCEXAMO 
DDMOVIO 
OOECOCM 
CCNV1 
DCPAGE 
DCLNCT 
ODSPPR 
DO SPACE 
OOIMTL 
DDPRINT 
DORGEN 
DDEEGRP 
DDENDRP 
*** SCRTW3F0 *** 
DECKiO 
DECK12 
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XXVll 



I IGS274 Disk Resident Library 

INTERCOM 4.1 routines associated with the Interactive Graphics 274 terminal 

subsystem. 



********** 

* * 

* IGS274 * 

* * 
** ******** 

•♦♦INTERCOM*** 
AELBUT 
GFGNTA 
GFCNTN 
GIABRT 
GIBRO 
GIEWRT 
GIES2 
GICOKF 
GICOFY 
GIFID 
GIFSIO 
GILKID 
GIKAC 
GIMESG 
GIKOVE 
GIFLCT 
GITIHM 
GUARC 
HARK 
IEG 

GUARCG 
GULINE 
GUFNTS 
DHINIT 
DHFLSH 
OKGTEO 
DHRLEO 
DKGET 
tMUTIL 
DHDMP 
AEXEC 
CCNSCLC 
ERASER 
GIANE 
GIAKS 
GIBUT 
GICLR 
GIDISF 
GIEBUT 
GIMASK 
GUAN 
MACBYT 
GLRSET 
GUTIL 
G VALID 
SEGENR 
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SCOPE 3.4 DOCUMENTS 



CDC CYBER 70 and 6000 Series computer systems hardware and software 
information is available in the following documents: 



Hardware Documents 

CDC CYBER 70/Model 72 Systems Description and 

Programming Information (vol. 1) (RM) 
CDC CYBER 70/Model 73 Systems Description and 

Programming Information (vol.1) (RM) 
CDC CYBER 7 0/Model 74 Systems Description and 

Programming Information (vol.1) (RM) 
CDC CYBER 70/Models 72, 73, and 74 Instruction 

Descriptions (vol.2) (RM) 
CDC CYBER 70 Computer Systems-7030 Extended 

Core Storage (RM) 
CDC CYBER 70/Models 72, 73, and 74 and 6 000 Series 

Computer Systems I/O Specifications (RM) 
7600 Computer System (RM) 

7600 Computer System Hardware Features (RM) 
7618-1, 762 8-2, and 7629-1/2 Magnetic Tape Controller 
7681 Data Channel Converter (RM) 
7683-1 Remote Channel Coupler (RM) 
7611-10 Buffer Controller (RM) 

6000 SCOPE On-line Diagnostics (GIM) 

6000 Series Computer Systems I/O Specifications (RM) 
6000 Series Computer Systems Instruction Card 
6000 Series Computer Systems Instruction Codes 
6000 Extended Core Storage (RM) 
6682-A and 6683-A Satellite Coupler (RM) 
6681-B/C/D and 6684-A Data Channel Converter (RM) 
6676-A Teletype Multiplexer (RM) 
6676-B/C Teletype Multiplexer (RM) 
6 673/6674 Data Set Controller (RM) 
6671 -A/B and 6 671-1 Data Set Controller (RM) 
6642-1 Distributive Data Path Operations/Programming 
6641 -A Data Set Controller (RM) 
66 39-A/B Disk File Controller (RM) 
66 22-A/B Magnetic Tape Controller (RM) 
6603-A/B/C Disk File Controller (RM) 
6602-A/B/C/D/E and 6612-A/B/C/D/E/F/G Console 
Display Controller (RM) 



(RM) 



(RM) 



Publication Number 

60347000 C 

60347200 A 

60347400 D 

60 347 300 C 

60347100 D 

60342500 C 
60258200 C 
60258500 B 
60341600 B 
60356000 A 
60 296 200 C 
60275000 B 



60 309800 A 
60100000 N 
60164500 
60141900 
60225100 
60334300 
60334400 
38706000 B 
38707800 D 
60334500 A 
60334600 A 
60 376 300 A 
60334200 A 
60334100 A 
60333600 A 
60334000 A 

60333900 A 
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XXXI 



Hardware Documents 



Publication Number 



36 2X-A/B Magnetic Tape Controller (RM) 

3555-1 Line Printer Controller (RM) 

3553-1/2 Mass Storage Controller (RM) 

3518 and 35 28 Magnetic Tape Controller (RM) 

3447-A/B Card Reader Controller (RM) 

3446-A/B and 3644-A Card Punch Controller (RM) 

3436-A and 3637-A Drum Storage Controller (RM) 

3243-A/B Magnetic Tape Controller (RM) 

3234-A/B Mass Storage Controller (RM) 

3232-A/B Disk Drive Controller (RM) 

3 231 -A Disk Pack Controller (RM) 

3228-A/B and 3229-A/B Magnetic Tape Controller (RM) 

3 000 Series Computer Systems Peripheral Equipment 

(vols. 1, 2) (RM) 
733-10 High Speed Batch Subsystem Functional 

Characteristics and Programming Manual (RM) 
732 Medium Speed Batch Subsystem Functional 

Characteristics and Programming Manual (RM) 
720 Digital Commumications Terminal Control ttiit (RM) 
713 Conversational Display Terminal Hardware 

Programming Manual (RM) 
713 Conversational Display Terminal (OG) 
712 Printer Terminal Hardware Programming Manual (RM) 
712 Printer Terminal (OG) 

711 CRT Display Terminal Hardware Programming Manual (RM) 
711 CRT Display Terminal (OG) 
595 Print Cartridge (RM) 
512 Line Printer (RM) 
505-A/B High Speed Line Printer (RM) 
501-C/D High Speed Line Printer (RM) 
501-A/B High Speed Line Printer (RM) 
417-1 Card Punch controller (RM) 
405 High Speed Card Reader (RM) 
364-4/5 Communications Multiplexer (RM) 
364-3 Communications Multiplexer (RM) 
364-1/2 Communications Multiplexer (RM) 
304-1 Communications Multiplexer (RM) 
275 Digigraphic Buffer Memory (RM) 
274 Digigraphic Console, Theory of Operation (RM) 
273 Digigraphic Console (RM) 
271 Digigraphics Controller (RM) 
250-2 Display Subsystem (RM) 
222-A/B Line Printer Controller (RM) 
200 User Terminal (RM) 



60331500 


A 


60231300 


A 


60 278 500 


A 


60287600 


D 


60332300 


A 


60332100 


A 


60333100 


A 


60331600 


A 


60333300 


A 


60165300 


01 


60110900 


C 


60331700 


A 


60108 800 





60 329 500 


01 


60348100 


01 


36814300 




62033400 


02 


62037900 


00 


62073900 




62049400 


00 


62022700 


02 


62034100 


01 


44855800 


C 


44980100 


C 


40820800 


A 


40807200 




40805000 




60283600 


B 


40809300 


E 


41612700 


A 


41612500 


A 


41610900 


A 


13796400 


A 


60181300 


A 


60279100 


A 


60188600 


A 


60181400 


A 


82129000 


A 


47966700 


E 


82128000 


B 
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Software Documents 

ALGOL 3 (RM) 

APT 2 (GIM) 
APT 2 (RM) 
APT 2 (IN) 

BASIC Language 2 (RM) 

COBOL 4 (GIM)t 
COBOL 4 (RM) 
COBOL 4 (IN)t 

COMPASS 3 (GIM)f 

COMPASS 3 (RM)t 

COMPASS 3 (IN) 

COMPASS 3 (Instruction Cards)t 

EXPORT/IMPORT 8231 HS 1 (RM) 
1700 IMPORT HS 1 (RM) 
1700 MSOS IMPORT HS 1 (RM) 
1700 MSOS IMPORT HS 1 (OG) 



FORM 1 (RM) 



4 (GIM)t 
4 (RM)t 
4 (IN)t 
DEBUG (UG)t 
(RM) 
(IN) 



FORTRAN Ext. 

FORTRAN Ext. 

FORTRAN Ext. 

FORTRAN Ext . 

FORTRAN 2. 3 

FORTRAN 2.3 

SIFT (PSB) 

Math Science Library (8 vols) (RM) *f 

Math Science Library Usage Information* 

Math Science Library (GIM)t 

240 Series Interactive Graphics System (RM) 

2 74 Interactive Graphics System 2 (RM) 
274 Interactive Graphics System 2 (OG) 

INTERCOM 4 (RM) 

INTERCOM 4 Multi-User Job Capability (PSB)* 

LOADER (RM)f 

Multi-Access Retrieval System 2 (MARS VI) 

for Partial Inversion (RM) 
Multi-Access Retrieval System 2 (MARS VI) 



♦Limited distribution; available only through 
Distribution Section, Sunnyvale, Ca. 94 086. 

tCombined 6000/7000 Series manual. 



Publication Number 


60329000 


B 


60172100 




60174500 


C 


60193100 




60306 200 


C 


60327800 


A 


60384100 


A 


60328400 


A 


60343400 


A 


60360900 


A 


60361000 


A 


60361700 


A 


60189100 


A 


60235400 


D 


60305700 


A 


60359800 


A 


60 307000 


D 


60327900 


A 


60305600 


B 


60357900 


A 


60329400 


B 


60174900 


F 


60189500 


E 


60358400 


A 


60327500 


A 


60329200 


A 


60328900 


A 


17307300 


D 


60358800 


A 


60359800 


A 


60 307100 


B 


60358300 


B 


60344200 


B 


17313100 


A 


17313000 


A 


Software Manufacturing anc 
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Software Documents 



Publication Number 



PERT/TIME 1 
PERT/TIME 1 



(GIM) 
(RM) 



| Programming Reference Aids 

| QUERY UPDATE 1 (RM) 

| QUIDDL 1 (RM) 

| Record Manager 1 (RM) 



SCOPE 3.4 (RM) 

SCOPE 3.4 (SPRM) 

SCOPE 3.4 (OG) 

SCOPE 3.4 (IH) 

SCOPE 3.3/3.4 Conversion Aids (PSB) 



SIMSCRIPT 
SIMSCRIPT 



2 (GIM) 
2 (RM) 



SIMULA 1 (GIM) 
SIMULA 1 (RM) 
SIMULA 1 (IN) 

SORT/ MERGE 4 
SORT/MERGE 4 

SYMPL 1 (RM) 



(GIM) 
(RM) 



UPDATE 
UPDATE 
UPDATE 



(RM)t 
(IN)t 
(OG) 



8-BIT Subroutines (RM) 

GIM General Information Manual 

IH Installation Handbook 

IN Instant 

03 Operator's Guide 

PSB Programming Systems Bulletin 

RM Reference Manual 

SPRM System Programmers Reference Manual 

UG User*s Guide 



60133300 
60133600 

60158600 

60307500 D 

60327900 D 

60307300 B 

60307200 D 
60306500 B 
60327300 C 
60307400 B 
60358200 B 

60173500 A 
60178300 C 

60251900 A 
60234000 E 
60235100 A 

60342400 A 
60343900 B 

60328000 A 

60 342500 B 
60283100 A 
60281600 A 

60359400 01 



♦Limited distribution; available only through Software Manufacturing and 
Distribution Section, Sunnyvale, Ca. 94086, 

tCombined 6000/7000 Series manual. 
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SCOPE VERSION 3.4 



RELEASE DESCRIPTION 

SCOPE 3.4 is a revised and extended version of the SCOPE 3 operating system. 

HARDWARE CONFIGURATION 

The minimum hardware configuration consists of: 

1 6000/CDC CYBER 70 Series computer 

24 million characters of mass storage 
on any combination of the following: 

854 disk drive 

865 drum 

814, 6603, or 6638 disk files with standard option 10037-A 

821 data file 

841 multiple disk drive 

1 405 card reader with controller 

1 415 card punch with controller 

1 501 or 512 printer with controller 

2 magnetic tapes from any of the following: 

604, 607, 657-2, 657-3, or 657-4, 659-2, 659-3, 659-4. 

RELEASE MATERIALS 

Release materials for the basic SCOPE 3.4 operating system package consist of 
the following: 

PL1 SCOPE 3.4 program library 

PL2 COMPASS 3.0 program library 

PL3 6RM 1.0/IS 2.0/DA 1.0 program library 

PL4 FORM 1.0 program library 

PL5 CE Diagnostics program library 

Unconfigured deadstart tape 

The SCOPE Program Library Tape contains the source programs for all routines 
comprising the SCOPE 3.4 operating system. Pn itemization of a complete SCOPE 
3.4 product set deadstart tape appears in the preface of this document. The 
unconfigured deadstart tape contains only the products SCOPE, COMPASS, 6RM, 
and SYMPL. 
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Required supplements to this package are: 

PL6 SYMPL 1 .0 /Maintenance Tools program library 

PL7 FORTRAN Extended 4.0 Compiler program library 

PL8 FORTRAN Extended 4.0 Object Routines program library 

| NEW FEATURES 

15 Control Points 

An installation can select from 1 to 15 control points at system assembly 
time. 

20 Peripheral Processor Support 

SCOPE 3.4 will support the hardware capability to have 20 PP»s and 24 
channels. 

Tape Scheduling 

Tape Scheduling (in SCOPE 3.3 known as automatic tape assignment) provides 
more control of system resources. The installation can tailor the system to 
its needs. The following capabilities are provided: 

Preview of a queue of tape-dependent jobs 

Dynamic tape drive status determination 

Scheduling of tape-dependent jobs based on tape availability 

Use of VSN information to accurately identify tapes 

Handling of fixed priority jobs 

Deadlock prevention 

Loader 

The SCOPE 3.4 loader directives and control cards allow the full use of 
alternate and user libraries. Expanded use of overlay structures allows up to 
4095 levels of overlays. 

The new loader maintains all existing features of the replaced CP and PP 
loaders, except segmentation. The following features have been added: 

Selection of alternate system libraries or user libraries to satisfy 
externals 

Selective load of programs from a file 

Greater load map flexibility 

Presetting of core 

Saving of core image of loaded program 
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Capability of not satisying selected externals 
Expanded user call capability 
Multiple entry points to overlays 

ED IT LIB 

EDITLIB has been rewritten to accommodate the new loader library structures, 
and it includes the capability to generate and modify user libraries. 

ECS I/O Buffering 

Through REQUEST card or macro declaration, ECS may be used to block the user's | 
input/output records into large ECS buffers thereby reducing the number of | 
accesses to rotating mass storage devices. 

ECS is divided into: 

System area: system information, flaw tables 

Paged allocatable area: I/O buffering area, resident library, swap files 

Direct access area: user area, as in SCOPE 3.3 

Integrated Scheduler 

The job scheduler for SCOPE 3.4 handles the normal batch jobs and in addition, 
controls the scheduling of all other jobs submitted to the system through 
remote facilities. The scheduler assigns a number, the job descriptor table 
(JDT) ordinal, to each job in the queue rather than just the control point 
number. Based on a set of job class characteristics, set by the installation, 
jobs may be swapped in and out to resolve resource conflicts or provide 
additional core for processing of high priority jobs; any job waiting for some 
external event (terminal I/O, tape assignment, PF availability, etc.) also 
will be swapped or rolled out. Through the use of job priority computation 
and job swapping, use of central memory and the central processor is improved. 
Jobs requiring high priority consideration will be placed in an express queue. 

ANSI Label Support 

Additional user header and trailer labels conform to the ANSI specifications. 

SCOPE 3.4 conforms to an ANSI label standard which supersedes the ANSI 
standard followed by SCOPE 3.3. Under the new standard, density of the label 
data is the same as that of subsequent data. 

Tapes\ with. : ;labels created ..under ^previous .systems must be identified as Z 

labels:;i£ ;label;and data densities -are not the same. SCOPE 3.3 and 3.4 u 

labels are ;jiot identical. :::Refer to Appendix E of the SCOPE 3.4 Reference 
Manual . 
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Private Pack Support 

The disk pack utilization has been expanded in the form of Sequential Packs. 
A multi-pack file no longer is restricted by the number of disk drives 
available. The only requirement is that the pack currently in process be 
mounted. The mult i- file capability is not available on Sequential Packs. 

Support of SCOPE Format on 659 Transports 

This feature allows such capabilities as having the deadstart tape created at 
800 or 1600 bpi on a 9-track tape. 

STATUS Request 

A new macro provides the user with information concerning the remaining 
resources in the system. This information will include file characteristics 
and unused rotating mass storage. 

Extended Error Processing 

An additional capability is provided in the area of error status. By setting 
a bit in the FET, the user can receive additional detail on the nature of any 
error condition. 

Permanent Files 

The PF utilities now read/write non-stop to disk and tape. 

A new PF utility, TRANSPF, allows the transfer of permanent files and/or the 
permanent file tables from one public mass storage device to another. 

The PF routines re-use RBTC space. 

ID hashing is used to search the permanent file directory (PFD) . 

Automatic archiving and retrieval of permanent files from tape is provided. 

Automatic swap-out is provided for jobs waiting for access to files, APF 
space, or the PF utilities. 

Two functions are new. SETP makes it possible to pre-position files at attach 
time, and ALTER allows end of information for a permanent file to be set to a 
current position. 

PFDUMP 

PFDUMP is a Fortran program which calls a PP program PFD, to dump the 
permanent file tables (PFD and RBTC) . The PP program asks for two operator 
n.GO responses before completion. If an installation does not want this 
program as part of their running system due to fear of the loss of security to 
their permanent file system, they should delete it from their program library. 
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Deadstart and Recovery 

Expanded recovery capabilities and reliability 

RMS label initialization independent of permanent files 

Option to logically turn off a CPU at deadstart time 

Exchange jump package dump 

Recovery of reconfigured CMR 

CORRECTIONS I 

All eligible PSR corrective code published through Summary 312 has been added 
to the SCOPE 3.4 program library. 

NOTES AND CAUTIONS | 

To prevent degradation in system performance, RMS devices used for SYSTEM, PFD 
and/or PF residency should be placed on double ranked channels (24B-33B) in 
machines having more than 10 PRU's and 12 channels. 

Under SCOPE 3.4, it is no longer necessary or permissible to create an EST or 
RBR entry for ECS. 

Sequential pack files (DP or 2DP on REQUEST card) cannot be ECS I/O buffered. 

CAUTION: The MMTC controller, operating at 1600 bpi in conversion mode, 
initiates a memory reference to controller memory cell 377 on detecting the 
first character of the postamble. Consequently, the flag bit always must be 
set in this cell; otherwise memory flag bit errors will occur. This problem 
is resolved when ECO/FCO CA26461 (3518) and CA26462(3528) are installed. 

When SCOPE 3.4 is run on a 6500 or 6700 using IP. XJ=1 or 2, FCO CA23065 must 
be installed (to prevent both CPU's from being in monitor mode 
simultaneously) . 

If the OUTPUT file is rewound but no other action is performed on the file, 
the OUTPUT file will be evicted; a skip to EOI is not performed prior to 
writing the job dayfile on OUTPUT. 

An installation defined limit is placed on the amount of mass storage that can 
be allocated to a job; jobs exceeding this limit will be terminated. The 
LIMIT control card can be used, however, for a job that is expected to exceed 
the installation limit. 

To free disk space following a disk overflow the alternatives are: 

KILL the job at one or more control points 

Allow jobs at control points to loop until disk space becomes available as 
other jobs leave the print queue 

A combination of the above 
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If permanent files are to be recovered, allocatable devices that are to be 
unavailable should be turned off at deadstart time, rather than having their 
ESTs zeroed out. 

Mass storage accounting is modified slightly. Accounting of mass storage 
accesses for CM read/write are based on the values assigned by the macro 
ACCOUNT in CMR. The range of values acceptable to the ACCOUNT macro is to 
32. 1SP/1EP rounds down the ACCOUNT values to a power of 2; resulting in 
effective values of , 1, 2, 4, 8, 16, or 32. These values give accounting of 
0, .2 5, .5, 1, 2, 4, or 8 milliseconds per PRU transferred. 

Permanent files cannot reside in ECS. 

Assignment of long stranger (L) tapes is prevented if SCOPE is assembled with 
IP.ECSB set to one (via code present in REQ under identifier SC40035) . 
Installations with ECS active must avoid any use of L tapes, as 1MT (the L 
tape driver) could be locked out of central memory by an ECS transfer, 
resulting in numerous lost data errors or a system hang. 

The COPY utilities do not support the random file features of SCOPE 3.4. 

If a reverse function (SKIPB, BKSP, etc.) reaches beginning of reel, the 
operation is considered complete, as are READSKP and SKIPF when they reach 
end-of-reel if UP is on. If UP is off, these operations automatically go to 
the next reel. The number of skips not completed is returned in the FET 
extension if extended error processing is selected. 

If two users submit dependent job strings with the same dependency identifiers 
and the same job name, SCOPE cannot distinguish between them. Therefore, the 
installation must prevent duplication by scanning job names for identical 
dependency identifiers. 

If DISPOSE of a file is executed prior to the end of a job but the job 
continues to use that file name, two files are created and there is no way for 
the operator to differentiate between them for such operations as EVICT or 
ENPR. 

INSTALLATION PROCEDURES " 

Installation of SCOPE 3.4 requires customizing to conform to the site's 
hardware and software specifications as follows: 

Selection of general installation parameters within IPARAMS 

Selection of tape processing installation parameters within CIOCOM 

Choice of tape scheduling option 

Configuration of CMR 

Consideration of scheduling parameters 

Determination of deadstart installation parameters 

Selection of permanent file installation parameters 

Selection of ECS parameters 

Construction of a deadstart tape 
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INSTALLATION PARAMETERS 

General installation parameters related to SCOPE are : defined within the 
COMDECK IP ARAMS. IPARAMS is listed in the routine CMR. Other installation 
parameters are described elsewhere in this and other sections of this 
document. Assigned (default) values and descriptions are listed below. 
Changes to the default values listed below should be made at IPARAMS. 15. The 
first parenthetical value is the default value as set on the released program 
library. Additional parenthetical values, where given, have also been tested. 

The default values of the IPARAMS configuration parameters are defined with 
the CEQU or CMICRO macros, so that an installation can insert all 
modifications at one given place. The CEQU and CMICRO macros are used to 
define variables conditionally. Since they are effective only if the 
variables have not been previously defined, any modifications should precede 
them. 

Symbols can be defined be EQU or CEQU except for IP.SYSL1, IP.VER and IP.SYSE, 
which are micros and must be defined by CMICRO. 

The following list constitutes the extent of installation changeable symbols 
in IPARAMS. Certain symbols present in IPARAMS in SCOPE 3.3 have been made 

installation invariant in SCOPE 3.4. 

IP.CMU (0) 

If nonzero, Compare/Move Unit hardware is present. 

IP. CP (6) 

If set to 6, all BCD cards will be punched as if by an 26. If set to 9, 
all BCD cards will be punched as if by an 029. This setting must agree 
with the mode set by IP.CR. 

IP.CR (69D) 

If set to 6, all BCD cards will be read as if punched by an 026. If set 
to 9, all BCD cards will be read as if punched by an 29. If set to 69, 
all BCD cards will be read as if punched by an 026; however, if a job card 
or a 7/8/9 end-of-record card has 29 punched in columns 79-80, all 
following BCD cards in that job will be read as if punched by an 29, 
until a following 7/8/9 end-of-record card changes the mode again. If set 
to 96, the inverse is true: 029 is default and job and EOR cards may 
switch to 026. The card reader routine, 2RC, treats all level 17 EOR 
cards as end-of-file for compatibility with JANUS. 
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IP.CSET (IP.C6 3) 

Defines character set to be used throughout the system; it must be set to 
one of the following values: 

IP.C63 63-character set, same as SCOPE 3.3 and earlier systems. 

IP.C64.1 CDC standard 64-character set. 

IP.C64.2 64-character set where many special symbols have a different 
definition and graphic than the 63-character set. 

The CEQU statements for IP.C63, IP.C64.1, and IP.C64.2 must not 
be altered by the user. 

Each of the three character sets are described in detail in Appendix A of 
the SCOPE 3.4 Reference Manual, Publication No. 60307200. 

IP.CSET must have a constant value as all products to be added to the 
deadstart tape are assembled. 

I P. DSP (PEABCD) 

Macro representing a string of two-character mnemonics; each represents 
special characteristics for a disposition of output files. Example: 
IP. DSP CMICRO, (1P2P3P) indicates special mnemonics for one-part, two- 
part, or three-part paper. 

IP.ECSB (0) (1) 

If zero, the ECS extensions code is not assembled. If non-zero, the ECS 
extension code is assembled; and the ECS installation parameters are 
activated. 

IP.3P250 (0) 

If non-zero, the graphic display package is part of the system. 



IP.IMUL (0) 

If nonzero, Integer Multiply hardware is present, 
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IP.IQD (6) 



Input queue delay. The lower 6 bits of the input queue priority are 
incremented by one every 2**IP.IQD seconds (0 to 11) . See Scheduling I 
Parameters. ] 

IP.IQPW (3) , .. 

Input queue priority weight. The effective input queue priority is 
(P*(2**IP.IQPW)) +A. P= job card priority, A = age addend (0 to 6). See I 
Scheduling Parameters. I 

IP.LVF (70B) 

Lowest fixed priority. Normally, it should be greater than IP.MPR. Since 
a fixed priority does not age, it is normally higher than can be specified 
on a job card. Thus it can be created only by operator action. 

IP. MAP (10B) (2) -*- 

Default loader MAP option. = MAP(OFF), 1 = <MAP=S) , I 

2 = (MAP=B) (corresponding to SCOPE 3. 3 MAP (PART) ) , 

4 = (MAP=E) , 10B = (MAP=X) (corresponding to SCOPE 3.3 MAP (ON)) 

5 - Loader statistics and error messages only 

B - S Option plus block names, addresses and lengths 

E - B Option plus entry point list 

X - E option plus a cross reference list of external references 

IP.MCPU (1) 

Installation option to define maximum number of CPUs to be used by system. 
The value 1 will produce the most efficient code for use on a single CPU. 
The system will run on a 6500, but it will use only one CPU. The value 2 
will produce an MTR which will run on a 6500 or 6700 using both CPUs or on 
a 6400 or 6600 using one CPU. 

IP.MECS (0) (730B) (40B) 

Maximum number to 7777 (octal) of 1000 word (octal) blocks of ECS direct 

access that may be assigned in response to a job card EC parameter. This | 

value determines whether sections of code are to be assembled within the 
system to handle ECS allocation. 

IP.MFL (140000B) (300000B) 

Maximum amount of central memory field length that may be assigned to a 
user job. A user cannot request more than IP.MFL field length on job card or I 
with MEM or RFL. Each installation must set IP.MFL less than (machine FL-CMR | 
size-RBT area size-2*IP.POSFL*100B) . If value is too large, a job swapped out 
waiting for a large field length might be locked out and never be swapped in, 
even if the machine is idle. 
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IP.MMS (100B) 

Maximum mass storage limit that may be specified by PRUs/1 00 (octal) on a 
LIMIT card. . 

IP.MPPU (10D) 

The maximum number (7-20) of peripheral processors in the configuration of 
any of the CMRs on the deads tart tape. 

IP.MPR (2 OB) 

Maximum priority a user can specify on his job card. Range (1 to 70 B) . 
Normally, it should be less than IP.LVF. 

IP.MSCT (0) 

Maximum decimal number of messages (1 to 4095) that may be entered into 
the dayf ile by a single job. Only messages sent through MSG are counted. 
If zero* no maximum will be considered. 

IP.MTL (77777B) 

Maximum CP time limit in seconds, 1 to 77777 (octal), that may be assigned 
to a job. 

IP.NDFS (1) (2) 

Number of dayf ile copies on output. Up to 4095 decimal may be specified. 

IP.NJFL (2 0B) 

FL/100B assigned to batch jobs when first assigned to a control point. 
Range (1 to IP.MFL). The default value allows satisfaction of job setup 
utilities. 

IP.OQD (10B) 

Determines delay before incrementing priority of a job in the output 
queue. 

IP.POSFL (5) 

Field length/1 00B reserved for use by 1SO for requesting positive field 
length. Positive field length is not available to user jobs and can be 
considered part of CMR. Positive field length is allocated internal to 
the system for swapout use only. Range (4 to 10B) . 
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IP. S ECS (0) - ~ 

Default number of direct access ECS blocks*^ "( 10 00 octal words) to be 
assigned to a job if not declared on job card; range zero to IP.MECS. 

IP.SFL (50000B) 

Default central memory field length (octal) to be assigned to a job if not 
declared; 100 to IP.MFL. 

IP. SMS (0) ■- ■ -■' 

If non-zero, the default mass storage PRU limit a job can use, divided by 
100 (octal) . All jobs therefore proceed as if a LIMIT card with value 
IP. SMS were in the job deck. Refer to the LIMIT card in the SCOPE 
Reference Manual. 

IP.SPR (10B) 

Default priority given to a job if no priority specified on job card. 
Range 1 to IP.MPR. 

IP. STL (100B) 

Default time limit in octal seconds (1 to IP.MTL) to be assigned to a job 



»a j- u. 
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IP.TCPOB (4) | 

i 

The number of time units that should be accumulated on CPUA for the 
equivalent of 4l time units on CPUB. the default value should be used on a 
6500; for a 6700, the value 9 should be used to indicate CPUA to be 2.25 
times as fast as CPUB. 

IP. TYPE (6600) 

*?!i!i rBlines the t yP e of antral processor to be used by the system 16600 
(CDC CYBER Model 74) or 6400 (CDC CYBER Model 72)) for gelation of 
optimal code. Acceptable values are 6400 and 6600. 
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IP.XJ (-1) (1) 

Values (pertaining to routine CMR only) 

Computer does not have the central exchange feature; central monitor 
is simulated. 

1 Make use of central exchange jump feature. 

2 Make use of central exchange jump feature including the MAN 
instruction. 

-1 Central exchange jump feature is not to be used. An exchange jump 
protection program is included to protect the system against an 
accidental execution of an exchange jump instruction. 

When multiple CMR»s are assembled, any of which are assembled with a value 
of or -1, MTR must be assembled with a or -1 value. 

IP.YMD (MDY) 

Micro which shows format of date to be typed in at deadstart. The six 
possible permutations of the letters MD¥ constitute the range of this 
parameter. 

The IPARAMS common deck also contains symbols IP. II£MD, IP. IUSED, IP. 1M1, 
IP.1WB, and IP.1ZZ. The INTERCOM ft. 1 section contains a description of these 
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TAPE PROCESSING INSTALLATION PARAME I tRS 

The default values of the CIOCOM configuration parameters are defined with the 
CEQU or CMICRO macros, so that an installation can insert all modifications at 
one given place. The CEQU and CMICRO macros are used to define variables 
conditionally. Since they are effective only if the variables have not been 
previously defined, any modifications should precede them. 

Symbols can be defined by EQU or CEQU except for IP.SYSL1, IP.VER and IP.SYSE, 
which are micros and must be defined by CMICRO. 

Installation parameters specifically oriented to tape processing are defined 
within the COMDECK CIOCOM. CIOCOM is listed in the routine CMR. Changes to 
default values should be made at CIOCOM. 6. Assigned (default) values, other 
tested values, and descriptions are as follows: 

The following constitutes the extent of installation changeable symbols in 
CIOCOM. Certain symbols present in CIOCOM in SCOPE 3.3 have been made 
installation invariant in SCOPE 3.4. 

IP.CBKSP (0) 

If one, controlled backspace is available in all controllers; if zero, it 
is not installed. 

IP.NBCD (0) 

9-track default conversion mode (0=ANSI, 1=EBCDIC) 

IP.NBRK (0) 

If zero, system noise records are used in write recovery; if one, they are 
not used. 

IP.NDEN (2) 

Density for label and data on 1/2 inch 9-track tape, if not declared on 
REQUEST or LABEL card. 



IP. NOISE (3) 

Maximum decimal number of 12-bit bytes in a noise record on 7- track S and 
L tapes or 9-track Conversion Mode (S- format) magnetic tape. A record 
less than or equal to IP. NOISE is discarded. 

IP.NOIS9 (17D) 

Maximum decimal number of 8-bit bytes in a noise record for packed mode on 
9-track tapes. A record less than or equal to IP.NOIS9 is discarded. 
Default (17D) is the ANSI standard. 
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IP.RCYC (3R000) 

Retention cycle (0-999) for calculating tape label expiration date when no 
retention cycle is given; 999 indicates permanent retention. The address 
field of the symbol definition should contain 3Rxxx where xxx defines 
retention cycle; leading zeros need not be written. 

IP.RPE1 (12D) 

Total decimal number of read parity retries on a single record (must be 
less than 60) . 

IP.RPE2 (8) 

Decimal number of read parity retries accomplished by backspacing over the 
previous three records then reading forward in an attempt to recover 
(IP.RPE2 must be less than IP.RPE1.) 

IP.TDEN (0) (2) 

Density for both label and data on 1/2-inch 7-track magnetic tape if not 
declared on LABEL or REQUEST card: 0=556 bpi, 1=200 bpi, 2=800 bpi. 

IP.TRYS (10D) 

The number of unsuccessful attempts to locate the last good record, in 
excess of the minimum before declaring parity error irrecoverable. The 
minimum is equal to zero if IP.NBRK=1 or number of skips done +2 if 
IP.NBRK=0. This value should not exceed 6 2D. 
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Name 


Bit 


S.AUTO 


1 


S.ORES 


1 


S.PRES 


2 



S.2LBP 



IP.TSG (2617B) (6017B) 

Tape scheduling options as follows: 



Enable automatic tape assignment according to LABEL or 
VSN specification 

Enable job scheduling based on unit availablility 

Enable pre-st aging features (the VSN preview of the P 
display) 

Only ANSI labels will be accepted and written 
Two label formats (ANSI and 3000) are defined 

Allow auto assign to not ready unit 

Automatic unloading of tapes if necessary to make 
automatic assignment 

Write-enabled, unlabeled tapes will be considered as 
usable for automatic assignment as scratch tapes 

Write enabled expired labeled tapes will automatically 
be considered for assignment as scratch tapes 

Write-enabled blank labeled tapes will automatically 
be considered as scratch tapes 

Give warning if tape job has no VSN information 
Preabort such jobs 

Job initiation is based on tape drive availablility; 
total demand cannot exceed number of drives logically. 
Job initiation allows tape drive overcommitment, 

Unless specified otherwise on REQUEST or LABEL cards, 
all tapes will be unloaded at end of job 

Prestaging feature (bit 2) set on at deadstart time. 
This is equivalent to the STAGE ON typein 

Reserved ;f or CDC 

Operator cannot override VSN card 

Enable label debug code (4LB,4LC) 

Reserved :f or CDC 

Note: Use of bit 4 assumes that the basic auto-assign option (bit 0) is on. 
Likewise, bit 5 assumes that both bits and 4 are on. Assembly errors result 
when setting of these bits is inconsistent. 



S.AUNR 


4 




S.AUUL 


5 




S.SCUL 


6 




S.SCEL 


7 




S.SCBL 


8 




S.PREA 


9 




S.OCJI 


10 




S.UEOJ 


11 




S.PSON 


12 






13- 


16 


S.NOOR 


17 




S.DBUG 


18 






19- 


20 
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Cross Reference Listing 

ne following cross-reference listing shows the SCOPE routines that reference 
each IPARAMS and CIOCOM symbol. 



******* 






















IFARAKS 






















******* 






















IF 


.CHC 






















IF 


.CF 


IIP 




















IF 


.CR 


1IR 




















IF 


.CSET 


1RN 


1IR 


1MT 


1P2 


19k 


1P3 


1P1 


1HI 


1RV 


1NO 






1N2 


1N3 


1R2 


1R3 


1TF 


1WS 


1NW 


8T3 


2T8 


1CR 






1CT 


1CS 


1RT 


IRS 


1MR 


1W9 


1C9 


1R9 


7T1 


7T2 






2LP 


2 PC 


2RC 


<*LE 


6LC 


klC 










IP 


.OSF 






















IP 


.Ecse 


CEA 


CEO 


STL 


IRCP 


CCK 


OSO 


1AJ 


7EC 


1EJ 


1SF 






REQ 


1SI 


ISO 


CEM 


TOS 


LOAD 


LOAOM 


LCAOU 


LOAOLM 


UCLCAQ 


IP 


.GFZsO 


Cffi 




















IF 


.ILCMO 


CSC 




















IP 


.IHL 






















IF 


.ICC 


1RN 




















IF 


.IOFh 


1IB 




















IF 


.IUSIO 


CHR 




















IF 


.LWF 


1PF 


1RN 


1MH 


lie 


2TJ 


TOS 










IF 


.*AF 


1AJ 


lie 


















IF 


.MCFL 


CEO 
RPV 


CMR 


MTR 


OSD 


1EJ 


ISP 


OIS 


lie 


ISO 


2TJ 


IF 


.MECS 


CMP 


MTR 


OSO 


CIS 


lie 


2TJ 










IF 


.MFL 


1AJ 


MEM 


ISO 


2TJ 


TOS 












IF 


>MS 


1AJ 




















IF 


.KFFU 


CHR 


MTR 


















IF 


.MFR 


2TJ 


DSP 


















IF 


.MSCT 


HSG 


1IB 


















IF 


.MTL 


2TJ 




















IF 


■ NDFS 


1EJ 




















IF 


.NJFL 


CMR 




















IF 


.OOC 


1RN 




















IF 


FCSFL 


MTR 


ISO 


















IF 


SECS 


2TJ 




















IF 


.SFL 


1PF 


1SI 


2TJ 


TOS 














IF 


SfS 


1IB 


1SI 


















IF 


SFR 


2TJ 




















IF 


STL 


2TJ 




















IF 


TCFUB 


CMR 




















IF 


TYFE 


CMR 




















IF 


XJ 


CMR 


MTR 


















IF 


YMC 






















IF. 


1M1 


OSO 




















IF. 


1WE 


DSD 




















IF. 


122 


OSO 




















****** 






















CICCO* 






















****** 






















IF. 


CEKSP 


1MT 


1HI 


IMS 


INK 


lt>9 












IF. 


NECC 


1EJ 


REQ 


6L3 


ITS 














IF. 


NERK 


1MT 


1P2 


1F3 


1P1 


6BW 












IF. 


NCEN 


REQ 




















IF. 


NOISE 


CEO 
INN 


1MT 
2TB 


1P1 
IRS 


1NO 
1NR 


1N2 


1N3 


1R2 


1R3 


1TF 


1WS 


IF. 


N0IS9 


IP! 


1NO 


IN 2 


1N3 


1R2 


1« 


1TF 


1NW 


2TB 


IN* 



IF.RCYC 
IF.RFE1 



IF.RFE2 



IF.TOEN 
IF.TSG 



4LB 


<»LC 


















1RN 


1MT 


IP 2 


lPit 


1P3 


1P1 


1HI 


1RV 


1N0 


1N2 


1N3 


1R2 


1R3 


1TF 


1HS 


INK 


8T3 


2TP 


1CR 


1CT 


1CS 


1RT 


IRS 


1NR 


1*9 


1C9 


1R9 


<*lb 


4LC 




1RN 


1MT 


1P2 


1P*» 


1P3 


1P1 


1HI 


1RV 


1KO 


1N2 


1N3 


1R2 


1R3 


1TF 


1HS 


inh 


8T3 


2TB 


1CR 


1CT 


1CS 


1RT 


IRS 


1NR 


1H9 


1C9 


1R9 


kl3 


*,LC 




CED 


REQ 


IRQ 
















CEO 


CMR 


OSO 


CIO 


IFF 


1£J 


300 


13N 


kES 


REQ 


2TA 


1RP 


1CL 


2TC 


1TO 


10P 


1PK 


3PK 


1BT 


IMF 


1MH 


1LT 


1MT 


IP 2 


1P<* 


1P3 


1P1 


1HI 


1RV 


1NG 


1N2 


1N3 


1R2 


1R3 


1TF 


IMS 


1NW 


8T3 


2TR 


1CR 


1CT 


1CS 


1RT 


IRS 


lf^R 


1H9 


1C9 


1R9 


HE 


2TJ 


hlB 


<»LC 


6WM 


ITS 


REQUEST 
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TAPE SCHEDULING 

""ape Scheduling options that may be selected by the installation are 
implemented by the use of conditionally assembled code. The bits in IP.TSG 
are tested at assembly time to determine the exact nature of the programs that 
comprise tape scheduling. For example, bit S.SCBL in IP.TSG governs the 
automatic scratch status- of blank labeled tapes. If the bit is on, blank 
labeled tapes will be considered scratch without operator intervention; if the 
bit is off, scratch status will not be granted automatically. 

The bits in IP.TSG can be divided into the 3 general catagories of automatic 
assignment bits, pre-staging and overcommitment bits, and miscellaneous bits. 

Automatic Assignment Bits 

"he installation can select 4 levels of automatic assignment by setting the 3 
bits S.AUTO, S.AUNR, and S.AUUL: 

No automatic assignment (all 3 bits off) 

Basic automatic assignment (bit S.AUTO on and others off) . 

Auto assign to not ready unit (bits S.AUTO and S.AUNR on) . 

Auto assign to not ready unit with unload (bits S.AUTO, S.AUNR, and S.AUUL 
on) . 

tfith only S.AUTO set on, a specific tape will be assigned automatically when 
the specific tape is mounted. This level of automatic tape assignment is the 
basic and most generally useful. In the not ready modes, a search is made for 
the specific tape requested. When it is found, it is assigned, and the job 
continues. If it is not found, a not-ready tape unit is selected and the 
operator is instructed to mount the specific tape on the exact unit selected. 
If no not-ready tapes are available and the unload option is selected a ready 
tape will be selected and unloaded and the operator will be instructed to 
mount the required tape on that unit. 

Automatic Scratch Status 

Three other bits are related to automatic assignment. They are bits S.SCUL, 
S.SCEL, and S.SCBL. When set, each bit determines a specific type of tape to 
be considered automatically as a scratch tape. If all three bits are off, the 
only tapes treated as scratch are those specifically designated by the 
operator with the command SCRuu (where uu is the EST ordinal). 

\ job specifies *MT or VSN = SCRATCH in the request for a scratch tape. If 
any automatic assignment is turned on (bit S.AUTO is set) , the system will try 
to assign a scratch tape automatically to the job. The tape must be mounted 
on a ready unit with a write ring in place, it must also be designated as 
scratch as described above, and it must meet these qualifications; 

Tapes designated as scratch by the operator 

Unlabeled tapes if bit S.SCUL is on 

Tapes with expired labels if bit S.SCEL is on 

Tapes with blank labels if bit S.SCBL is on 



1-1-18 60307400 C 



Pre- St aging Bits 

Unit Reservation: 

Bit S.URES controls the necessity of jobcard tape parameters, without which 
overcommitment and deadlock prevention are meaningless and pre- staging will 
not function. 

Pre-Staging: 

The prestaging option is assembled if bit S.PRES is set. If this option is 
on, a pre-staging buffer is assembled in CMR, its length is N.VRNBUF*6 
(release value gives a 17 1B word buffer) . Installations can change the symboi 
N. VRNBUF in CMR to change the size of the buffer. 

If bit S.PSON is on, it sets up CMR as if STAGEON had been typed after a 
normal deadstart. Deadstart Recovery preserves the current setting of the 
STAGEON/STAGEOFF switch. 

If bit S.PREA is set, a job that specifies tapes on the job card but has no 
VSN specifications in the job will be pre-aborted. 

Overcommitment: 

Bit S.OCJI determines whether or not tape drives will be overcommitted. If 
the bit is off, the total number of tape drives required by all jobs executing 
at a given time (as determined by job card tape parameters) cannot exceed the 
total number of tape drives at the installation. If bit S.OCJI is on, tape 
drives are overcommited; the total tape requirements of executing jobs can 
exceed the total number of tape drives at the installation. Deadlock is 
prevented by an algorithm calculated each time a tape is assigned. 

Miscellaneous Bits 

Two Label Processors: 

If in additon to the ANSI label processor, 4LB, CDC 3000 (Y) labels are to be 
processed, bit S.2LBP should be on to allow use of the alternate label 

-» — ~— ~ ~ «- ^ — II Tn 

piui/CsauLf *rj_iv~. 

EOJ Tape Unload: 

Bit S.UEOJ causes 1EJ to unload non-scratch tapes at end of job. If any 
problems are encountered trying to unload the tape, such as tape not ready, 
the unload attempt will be ignored. This differs from the SAVE (SV on REQUEST 
card or X=SV on LABEL card) unload processed by 1EJ; 1EJ issues a message that 
problems exist and continues trying until the operator types in GOuu. 



60307400 C 1-1-19- 



Operator Cannot Override VSN: 

With bit S.NOOR off, the operator can assign a tape with a VSN different from 
the VSN specified by the job; however when this bit is on, a different VSN, is 
not allowed. 

Label Debug: 

Bit S.DBUG controls debug code in 4LB and 4LC; use of this bit is not the 
normal mode of operation. This debug code will produce many messages which 
show the calls to and returns from the label processors. Such messages may 
cause other more informative messages to be overwritten. 

Option Dependencies (IP.TSG) 

The two figures below show dependent bits. Each bit name shown cannot be 
turned on (or turning it on will have no effect) unless all bit names below it 
are on. The automatic assignment bits are independent of the Pre-staging and 
Overcommitment bits and vice versa. 

Miscellaneous bits (S.2LBP,S.UEOJ, S.NOOR, and S.DBUG) are independent of each 
other and of the bits shown below: 



Auto Assign Dependencies: 



S.AUUL 
S. AUNR 



S . SCUL 



S.SCEL 



S.SCBL 



S.AUTO 



Pre-Stage and Overcommitment Dependencies: 



S.PSON 


S.PREA 






S. PRES 




S.OCJI 


S.URES 



For example, to set bit S.AUUL on, bits S.AUNR and S.AUTO must be on; not 
having S.AUTO on will cause assembly errors. S.PREA is dependent on S.PRES 
and S.URES but not on S.OCJI. 
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CMR CONFIGURATION PARAMETERS 

The default values of the CMR configuration parameters are defined with the 
CEQU or CMICRO macros, so that an installation can insert all modifications at 
one given place. The CEQU and CMICRO macros are used to define variables 
conditionally. Since they are effective only if the variables have not been 
previously defined, any modifications should precede them. 

Symbols can be defined by EQU or CEQU except for IP.SYSL1, IP.VER and IP.SYSE, 
which are micros and must be defined by CMICRO. 

All the CMR configuration parameters are grouped together near the beginning 
of CMR. Changes should be made at CMR. 964. 

General parameters should be tailored to suit the needs of each installation; 
default values are shown in parentheses: 



I 



L.EST 
L.CST 
L.RPT 
L.INS 



L.FNT 
L.RMS 
L.SEQ 



N.RBR 



(4 OB) 
(50B) 
(10B) 
(0) 



(2200B) 

(10B) 

(10B) 



LE.DFB00 (400B) 

LE.DFBXX (100B) 

LE.CERFB (4 OB) 

N.CP (15D) 

N. DEVICE (3) 



(3) 



N.RQS 



(40D) 



Length of equipment status table (< 77B) 

Length of channel status table. 

Length of removable pack table. 

Length of installation table. Size, definition 
and usage of an installation table is completely 
controlled by the individual site. NO SCOPE 3.4 
product set program makes reference to the 
installation table. 

Length of file name table 

Length of the C.E. RMS diagnostic table 

Length of diagnostic sequencer table 

Size of system dayfile buffer 

Size of control point dayfile buffer 

Size of hardware error file buffer 

Number of control points (1 to 15D) 

Number of controllers for allocatable devices; 1 
for each 821 (2 units) , 1 for each 814 (2 units) 
1 for each 6603 unit, 1 or 2 for each 6638 unit, 
and 1 for each drum controller (which may drive 
more than one drum) and each disk pack controller 
(which may drive more than one disk pack unit) . A 
6638 with standard option 10037A is two 
controllers with one unit each (both 0) . 

Number of record block reservation tables; 
normally 1 for each 6638 unit, 1 for each drum 
unit, 1 for each 854 disk pack unit, and 2 for 
each 6603 (one each for inner and outer zones) , 8 
for each 821, 1 for each 814 unit, and 1 for each 
841 disk pack unit. 

Number of request stack entries 
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N.VRNBUF (20D) 

IP.SYSLT. ( SCOPE 3.4) 

IP.VER (RELEASE) 

IP.SYSE (07/30/72) 



Number of entries in VSN buffer. Each entry is 6 
words long and represents one line of job VSN 
information in the P display. 

System label (up to 20 characters) ; the first 
character must be blank. 

System version identifier (up to 10 characters) 
System generation date (up to 10 characters) 



Parameters set to configure CMR for the permanent files are: 



N.ESD 
N. RBTC 
N.SD 
L.APF 



(32D) 
(20D) 
(11D) 
(30D) 



INTERCOM parameters: 
L.ITABL (19) 

Scheduler parameters: 
L.ECSSWP (3) 



L.SCHJCA (2 0B) 



L.SCHJDT (400B) 



Number of entries per sub-directory, 

PRU number (octal) in RBTC 

Number of sub-directories 

Length of APF table (2 word entries) 

Length of INTERCOM table 



(See page 1-1-50). 

Swap to ECS mask: The value of this symbol 
determines which jobs get swapped to ECS. It is 
a mask of bits; each bit set defines a set of 
iobs that will be swapped to ECS. If all bits 
are off (L.ECSSWP=0) , only MUJ jobs and INTERCOM 
jobs swapped out on a quantum go to ECS. In 
addition, the following bit settings cause the 
particular types of jobs to be swapped to ECS. 

Bit INTERCOM job at end of a command 

Bit 1 Batch jobs swapped out on a quantum 

Bit 2 Swap all INTERCOM jobs to ECS 

Bit 3 Swap all batch jobs to ECS. 

Length of Job Control Area. Must be a multiple of 
8. (Needs to be changed only if new classes are 
added.) 



Length of Job Descriptor Table. Must 
multiple of 8. 



be 



Establishing a CMR for an installation requires inserting T inf ^ ati ^ ab ^ 
the CMR configuration parameters and tailoring the EST, DST, RBR, ana m 
tables SitT3?4 , up to eight different CMR configurations, each with unique 
EST, DST, RBR and RPT tables, may be placed on the deadstart tape. 
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Equipment Table Configurations 

Four equipment tables must be tailored for each installation: EST (equipment 
status table) DST (device status table) , RBR (record block reservation table) 
and RPT (removable pack table) table. The instructions for creating the EST 
entry differ between allocatable and non-allocatable devices. 

The EST may be altered from the console. DST, RBR, and RPT entries may not be 
altered from the console; as CMR changes in size with the addition or deletion 
of entries. 

The EST may be tailored to any configuration by using the macros described in 
this section. Its size may be greater than or equal to the number of hardware 
units present m the configuration. However, it may not exceed 77 (octal) 
since an EST ordinal must be no more than six bits. Since the first word of 
the EST may not be used, the first equipment ordinal is 01. 

Table Structures 

The CMR tables are defined by the TABLE macro. 

The sequence of the macro calls defines the sequence of the tables generated 
in CMR. This sequence can be altered by an installation, but the fol^owina 
constraints must be observed: 

1. Origins of EST, CST, FNT and DAT must be located under 10000 (octal). 

2. The RQS and DST table must be located under 20000 (octal) . 
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RMS Devices: 

The EDST macro causes a one-word EST entry to be constructed where the macro 
statement occurs. If no EDST macro with the same channel 1, channel 2, and 
controller has been assembled, a DST and corresponding DAT entry will be 
constructed. Numeric arguments must not have leading zeros. EDST macro 
entries should be made at CMR.2108. The macro format is: 

name EDST type ,chan1 ,chan2,contr, unit, sysres,pf ,onof f,priv. 

name Any combination of up to 6 alphanumeric characters 

type Two- letter hardware code: 

AA 6603 disk AF 814 disk 



AB 6638 disk AL 

(standard option 
10037A required) 



821 disk 



AC 
AD 



6603-11 disk 
865 drum 



chanl 
chan2 

contr 

unit 

sysres 

Pf 
onof f 

priv 



AM 841 disk pack 

AP 854 disk pack unit 

An EDST macro entry is not permissible for ECS in SCOPE 3.4 

Primary access channel for device (assumed decimal) 

Secondary access channel for device (decimal) . Only one 
channel can be assigned to each mass storage controller. 

Controller number for device 

Unit number (decimal) for device 

If non- blank, system will be deadstarted onto this device 

If non- blank, permanent files may reside on this device 

If non-blank, device is off initially; otherwise, device is 
on initially. 

If non- blank and type is AM or AP; the device will be made 
a private device. 



To avoid degradation in system throughput, the system resident device should 
be on a channel separate from any other equipment. 

Equipment (controller) numbers for 814, 821, 854, 841, and 865 devices must be 
4, 5, 6, or 7. 

Disk pack entries assembled into the EST for the installation CMR should be 
designated as logically free, so the operator can make them public or private 
as required. Disk packs which are to be used as private devices must be so 
configured when the CMR is assembled. Operator defined private packs will 
cause a system hang at first reference. 
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CMR Mass Storage Flaw processing 

Input to the FLAW macro in CMR is a 4-digit (octal) PB (physical block) 
number. Do not append B to the number. The first PB is number zero. Flaws 
must be entered in ascending orders. CMR sets flaw bit status of all RB* s 
necessary to cover the PB specified. FLAW macro entries should be inserted at 
CMR. 2375. Given the address of a bad spot in controller address format, the 
PB containing the bad spot can be computed as follows: 

For the 6638, 6603 and 865, no formula is required to compute the PB from a 
physical address. All that is needed is to decompose the physical address 
into the 12 bit value described below. 



6638 



bit 

bits 1-5 = 
bits 6-10 = 
bit 11 



if sector plus head group is even 

1 if sector plus head group is odd 
head group 

cylinder 



Example: bad spot at position (cylinder) 1, head„group 30 
decimal sector 9 corresponds to PB 175 (octal) so 
6638 FLAW 0175 



6603 



bit 



bits 1,2, 10 



bits 3-9 = 
bit 11 



if sector number is even 

1 if sector number is odd 

form the 3-bit head group number 

bit 1 = if head group even; 1 if odd 

bit 10 = if outer zone; 1 if inner zone 

head position 





Example: bad spot at position 108, head group 4; 

sector 6 corresponds to PB 3540 (octal) so 
6603 FLAW 3540 



865 drum 



bits 0, 1 = 
bits 2-7 = 
bit 8 
bits 9-11 = 



head subgroup 

head group 

if sector is even: 

zeros 



1 if odd sector/3 is odd 



Example: bad spot at head group 60 (decimal), head subgroup 3; 
sector 119 corresponds to PB 763 (octal) 

A formula ; is required to convert an 814, 821, 841, or 854 physical address 
into;a PB, The formula and examples are as /follows . 



814 



PB = cylinder*22+N/372+11*E 



where N bits 0-4 are sector number + 

bits 5-11 are track. 
Remainder of N/372 is discarded 
E = if N/3 is even and 1 if N/3 is odd 

+ the last 4 sectors of each cylinder are not used; 
no PB for track 127, sectors 28-31. 

Example: bad spot at cylinder 59, track 85, sector 9 
PB = 59*22+(2729/372)+11=1298+8+11 

= 1317 = 2445 (octal) so 814 FLAW 2445 
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821 



PB = cylinder*4+stack*2+E 
where E - if sector is even 

= 1 if sector is odd 
in controller address first byte, stack is bit 2°, cylinder 
is 2 l -29. Sector is in address second byte bits 2° thru 2 s 

Example: bad spot at controller address 0017 0002 (octal) 

corresponds to PB 36 (octal) so '821 FLAW 36 



841 



PB = cylinder * 5 + N + (track + 2N) /8 
where N = if even sector 

N = 2 if odd sector 
Remainder of division by 8 is discarded 

Example: bad spot at cylinder 4 track 8; sector 10 
corresponds to PB 25 (octal) 



854 



PB = cylinder*13+N/24+M where N bits 0-3 = sectors 

bits 4-7 = track 
M computed as follows: 
Let 1 = remainder of N/24 

R = remainder of 1/6 

M = if R < 3 

M = 6 if R > 3 and I < 15 

M = 7 if R £ 3 and I > 15 

♦sectors 12 thru 15 of track 9 on every cylinder are unused. 



EXAMPLE: cylinder 7, track 3, sector 15 (decimal): 
I = 15 15/6=2+3/6, R=3. M=7 
PB =7*13+2+7=91+9=100=144 octal. 



N/24=63/24=2+ 15/24 



Dead start 

The input to the FLAW type- in during dead start is an RB number, the first RB 
being number 1. When a parity error is encountered during system operation, 
the RB number, RBR ordinal, and corresponding address is recorded in the 
system day file. 

RBR Macro for RMS Devices 

The first header word of each RBR contains a 6- bit allocation style and a 
default bit which were parameters to the RBR macro when CMR was assembled. 

Several RBR*s can be generated for a single unit, each describing a unique 
area of the device. If RBR's have a unique allocation style for each RB size, 
this allocation style can be used to direct a file to the RBR with the desired 
RB size: If the default bit is set for an RBR, files with no specific 
allocation style may be assigned to that RBR. 
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One single equipment can be represented by any number of RBR tables (minimum 
of two for 6603) except for removable devices, which can have only one RBR per 
unit using the default RB size. Each RBR refers to a different area of the 
equipment. An RBR table is a single bit string of variable length, up to a 
maximum of 4095 bits, except for the first RBR of a system or PFD device, 
which must not exceed 2048 bits. Within an RBR table, one. bit represents one 
RB and the number of PRU 1 s per RB is constant throughout this table. RBR's 
are added to CMR by inserting RBR macro statements into CMR at CMR. 2380 
These statements have the form: 

name RBR count, prurb, alloc, default 

name must agree with name in associated EDST statement for same device 



s 

•I 



count 



Number of available record blocks in this RBR. The counts for 
all the RBRs on one unit must be set so that they do not exceed 
the size of the device. The number of RBs required to describe 
one unit of a device using RB size = PB size is shown in the 
following table. 



prurb 



Number of PRU's per record block. If not specified, the PB size 
will be used. The record block size may not be less than 1/32 
of the PB size or larger than 32 times the PP size. 



Device 

6603 disk 

6638 disk 

865 drum 

814 disk 

821 disk 

841 pack 

854 pack 

♦2 RBR's required 

♦♦The RB size for the 821 must not exceed 40 PRUs at time 
of release. 







Corres. 




Standard 


RBR Size 


Mnemonic 


RB (PB) in PRU 


in Bits 


AA, AC 


5 inner 


1024+ 




64 outer 


1024 


AB 


50 


2048 


AD 


21 


512 


AF 


6 2 


2816 


AL 


320^ 


2048 


AM 


56 


1000 


AP 


4 


2600 



alloc 
default 



Specifies allocation style: A value, range 0-77B used to 
specify RMS areas having particular RB sizes. 

If non-zero, files with no allocation style specified will be 
allowed on this device 



Note- On previous versions of SCOPE, scratch and system files could be 
assigned to an RBR with allocation style zero without the default bit set. 
On SCOPE 3.4, the same RBR must have the default bit set if scratch and 
system files are to be assigned to the device. 

EXAMPLE: An RBR for the 6638 with PRURB=50 requires a count of 2048 to 
describe one unit. If PRURB is set to 100, the count must be reduced to 
10 24. If two RBRs are defined for one unit of the 66 38, both using 
PRURB=50, the sum of the counts must not exceed 2048. 
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The following table reflects file assignment to an RBR depending on allocation 
style and the default bit setting in the RBR header. 

y file may be assigned to this RBR 
N file may not be assigned to this RBR 
d default bit 
AL allocation style 

PDE=1 file request specified: PF, device type, or EST ordinal. 
The RBR in question has already passed these tests. 

RBR Default Bit and Allocation Setting 



Re que s 


ted 


























Values 




d= 


= 0, AL= 


=0 


d= 


=0 


, AL= 


: X 


d= 


1, AL= 


=0 


d= 


=1, AL=x 


PDE=0 
AL =0 






N 








N 






Y 






Y 


PDE=1 






Y 








N 






Y 






Y 


AL =0 




























PDE=0 
AL =x 






N 








Y 






N 






Y 


PDE=1 
AL= x 






N 








Y 






N 






Y 


PDE=0 
AL= z 






N 








N 






N 






N 


PDE=1 
AL =z 






N 








N 






N 






N 



With allocation style, installations can differentiate record block sizes. 
Non-Allocatable Devices 

The macro used for creating an EST entry for non-allocatable devices depends 
on whether the device is a 3000 series or a 6000 series device (the console, 
multiplexer, 6671 Data Set controller, 6676 Data Set controller). 
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Macro for 6000 Series Equipment: 

An EST entry for 6000 series equipment is added by insertion into CMR at the 
appropriate EST ordinal at CMR, 21 08 as follows (number base is octal for this 
macro) : 

h 60Q0 chan,sync,unit,on/off ,ipoint 

h Two letter hardware type code 

DS Display console. See section 1-14 for definition 

of INTERCOM multiplexer types 

Access channel number 

Synchronizer or equipment number 

Not used-retained for compatibility with previous 

versions 

Switch, on=0, off=1 

Pointer to INTERCOM MUX subtable 



chan 
sync 
unit 

on/off 
i point 



Example: 



DS 6000 10,7 Creates an entry for a display console on channel 10, 
synchronizer 7. Parameters are assumed to be octal- 
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Macro for 3000 Series Equipment: 



An EST entry for 3000 series equipment is added by insertion into CMR at the 
appropriate EST ordinal at CMR. 21 08 as follows (number base is octal for this 
macro) : 

h 3000 channels B and A, channels D and C, equipment, MMTC, 
unit, on/off 

h CR Card Reader (405) 
LP Line Printer (501) 
LQ Line Printer (512) 
MT Magnetic Tape 607,657 
NT Magnetic Tape 659 
CP Card Punch (415) 



channel A 



channel B 
channel C 
channel D 
equipment 
MMTC 

unit 
on/off 



If one of the channels is channel zero, it must be 
described as such in the channel A field. (See II-1-26) 

The high order bit of the channel A field has special 
meaning for magnetic tape equipment: 

1) The high order bit set to zero indicates that all tape 
channels are accessed through 6681 data channel 
converters or through 6684 converters described and 
used as 6681 's. 

2) The high order bit set to one indicates that all tape 
channels are accessed through either all 6684-1 
converters or through all 6684- II converters. 

3) If IPARAMS symbol IP.CSET is equated to IP.C63, the 
data channel converters used must be all 668 1«s, all 
6684-I«s or 6684-11 «s used as 6681«s as in 1) above. 

If IPARAMS symbol IP.CSET is equated to either 
IP.C64.1 or IP.C64.2, The data channel converters, 
used must be all 6681 »s, all 6684-II's or all 6684-I«s 
used as 6681«s as in 1) above. 

channel A is the primary channel over which the equipment 
being defined will be accessed. Only magnetic tape 
equipment definitions may have channels B, C, and D 
specified. 

First alternate channel for access to tape transports 

Second alternate channel for access to tape transports 

Third alternate channel for access to tape transports 

Equipment number for device 

Set to 1 indicates presence of a 3518 or 3528 type magnetic 
tape controller. Set to indicates magnetic tape 
controller other than a 3518 or 3528. 

Unit number for device 

Switch, on=0, off=1 
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Examples: 



MT 3000 1213,, 5 ,,1 Creates an entry for a 7-track magnetic tape on I 

channels 12 and 13 (with a 6681 converter on both 
channels) equipment 5, unit 1 

Mr 3000 1253,, 5,, 1 Creates an entry for a 7-track magnetic tape on |j 

channels 12 and 13 (with a 6684 converter on both 
channels) equipment 5, unit 1 

Equipment numbers of 7- and 9- track magnetic tape controllers must be 4, 

0, d, or 7. ' 

Each 6000 channel can have only one 6681 or 6684 channel converter. This 
restriction does not exclude the use of a 6000 type controller on the same 
channel with the 6681 or 6684 converter. e Same 

Example modifications to CMR for installation of the following equipment: | 

6603 disk on channel 0, controller 1, unit 0, which is to be the system 
resident device and may have resident permanent files 

3000 card punch on channel 11, equipment 4 I 

3000 card reader on channel 12, equipment 4 I 

6000 console on channel 10, synchronizer 7 

3 000 printer on channel 11, equipment 6 

Pour magnetic tapes on channel 13, 6681 converter, equipment 5, units 

1, 2, and 3 ' 

865 drum on channel 11, controller 5, unit 

Three 854 disk pack units on channel 12, controller 6, unit 0, 1, and 2- 
drums and disk packs are to be initially OFF in the EST. * 
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♦INSERT CMR.964 
N. DEVICE EQU 



N.RBR 

♦INSERT 

6603 

CP 
CR 
DS 
LP 

MMTC 
TUNIT 

MT 

TUNIT 

865 

854A 

854B 

854C 

♦INSERT 

6603 

6603 

865 

854A 

854B 

854C 



EQU 

CMR.2108 

EDST 

BSSZ 

3000 

3000 

6000 

3000 

BSSZ 

SET 

SET 

DUP 

3000 

SET 

EDST 

EDST 

EDST 

EDST 
CMR.2380 

RBR 

RBR 

RBR 

RBR 

RBR 

RBR 



AA,0,,1,0,1,PF 



1 

11, ,4 

12,, 4 

10,7 

11, ,6 

1 





4 2 

13, ,5, MMTC, TUNIT 

TUNIT+ 1 

AD,11B,,5,0,,, 1 
AP,12B,,6,0,,,1 
AP,12B,,6,1,,,1 
AP,12B,,6,2,,,1 

1024, ,,D 
1024, ,,D 
512, ,,D 
2600,,, D 
2600,, ,D 
2600, ,,D 



(Standardizes EST ordinals) 



(Standardizes EST ordinals) 
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2. Example CMR modifications for installation of the following equipment: 

6638 disk; first half on channel 0, controller 1, unit 0, to be the system 
resident and permanent file directory device; second half on channel 1, 
controller 2, unit 

3000 card punch on channel 5, equipment 4 

3 000 card reader on channel 12, equipment 4 

6000 console on channel 10 , synchronizer 7 

Two 3000 printers on channel 11, equipments 6 and 7 

Sixteen magnetic tape units on channels 5, 11, 12 and 13, 6681 converter, 
equipment number 5, units through 17B 

Three 9-track magnetic tape units on channel 7, 6681 converter, equipment 
number 7, units 0, 1, 2 

*INSERT CMR. 964 
N. DEVICE EQU 2 
N.RBR EQU 2 
♦INSERT CMR. 2108 



EDST 

EDST 

3000 

3000 

6000 

3000 

3000 

SET 

SET 

DOP 

3000 

SET 

SET 

SET 

DUP 

3000 

SET 

♦INSERT CMR. 2380 
6638A RBR 2048,,, D 
6638B RBR 2048,, ,D 
♦INSERT CMR. 2375 
6638A FLAW 03 20 



6 63 8 A 

6638B 

CP 

CR 

DS 

T » 

LP 

TNUM 

MMTC 

MT 

TNUM 
MMTC 
TUN IT 

MTl 

Lli 

TUNIT 



AB,0,,1,0,1,PF 

AB,1, ,2,0,,1 

5, ,4 

12, ,4 

10,7 

11, ,6 

1l'/,7 





16,2 

1213B,1105B,5,MMTC,TNUM 

TNUM+1 

1 



3,2 

7,, 7, MMTC, TUNIT 

TUNIT* 1 
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DEADSTART PANEL SETTINGS 



By setting the toggle switches on the Dead Start Panel, the operator 
establishes a program that is loaded into memory and executed when the 
deadstart switch is activated. Required settings are determined by the system 
configuration and tape records. Channel, equipment, and unit numbers of the 
magnetic tape drive holding the deadstart tape must be specified according to 
actual connection and settings on the controller and unit. 

Bits 6-8 of either word 3 or 5 indicate the record containing configuration 
data that will be loaded during deadstart. If only one CMR exists, these bits 
should be set to zero. The other CMR configurations can be accessed by 
setting the bits to an octal value that is one less than the configuration 
number. For example, the seventh CMR is obtained by setting these bits to 6. 

The PPO save indicator (word 7) relates to dumping contents of that peripheral 
processor as the first deadstart action. Unless this bit is 0, the original 
contents of PPO cannot be dumped because it will be overwritten by the 
deadstart dump program. When the bit is not set, the contents of PPO will be 
copied to central memory and dumped from there when the dump routine is 
executed. 

Two Dead Start Panel settings are shown. The first figure shows the standard 
setting for SCOPE; it assumes that the deadstart tape unit is on channel 0, 12 
or 13. The setting in the second is for a tape on any of channels 1-11. For 
all panel settings, a 1 indicates the up or set position; a indicates the 
down position. Addresses not shown are irrelevant. 



ADDRESS 

0001 111 10 1 0c 

0002 111 111 0c 

0003 eee rrr 00 u 

0004 111 111 0c 

0005 000 000 001 

0006 111 111 0c 

0007 1 10 

0010 111 10 0c 

0011 111 1 0c 

0012 000 000 001 
The remainder of the panel is irrelevant. 

cccc Tape channel number (0, 12, or 13) 

Tape controller number 
Tape unit number 
PPO save switch (1 if PPO is not to be saved) 



c c c 

c c c 

u u u 

c c c 



c c c 

s 

c c c 

c c c 

1 1 



eee 

uuuu 

s 
rrr 



CMR number (000 for first CMR) 
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ADDRESS 






















0001 


1 


1 


1 





1 


1 








c 


c c c 


0002 


























1 


1 1 


0003 


1 


1 


1 


1 





1 








c 


c c c 


0004 


1 


1 


1 


1 


1 


1 








c 


c c c 


0005 


e 


e 


e 


r 


r 


r 








u 


u u u 


0006 


1 


1 


1 


1 


1 


1 








c 


c c c 


0007 


A 




1 


1 











o 


n 


s 


0010 


1 


1 


1 


1 














c 


c c c 


0011 


1 


1 


1 








1 








c 


c c c 


0012 


























1 


1 1 


0013 
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eee 



Tape channel number (1-11) 



Tape cuuciuxiei. iiuulve.*. 



uuuu Tape unit number 

s PPO save switch (1 if PPO is not to be saved) 

rrr CMR number (000 for first CMR) 

Dead Start Panel to Read from Tape on Channels 1-11 
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MAIN DEADSTART DISPLAY 

The Operator Option Matrix (Main Deadstart Display) for SCOPE 3.4 is described 
in the SCOPE 3.4 Operators Guide. To provide additional flexibility in RMS 
device label and permanent file processing for SCOPE 3.4, it was necessary to 
separate functions thus increasing the number of options in the Option Matrix. 
The following descriptions equate selections between SCOPE 3.3 and SCOPE 3.4. 

In SCOPE 3. 3: 

On non-recovery deadstarts, it always was necessary to pre-load the system 
from tape. 

RMS device labels and permanent file tables (PFD and RBTC) were 
initialized simultaneously. 

In SCOPE 3.4: 

SYSTEM=ZZZZZ04 is a permanent file; it is not always necessary to preload 
from tape on non-recovery deadstarts. It is possible to: 

Update RMS device labels (especially the RBR flaw information) 
without reloading permanent files because the permanent file tables 
(PFD and RBTC) are not reinitialized. 

Reload permanent files after initializing the permanent file tables 
without re-entering FBR flaw information in RMS device labels. 

Prohibit permanent files from residing on mass storage other than 
pack devices (854 and 841). 

When SCOPE 3.4 is brought up initially and the mass storage devices had been 
used by a system other than SCOPE 3.4, it is necessary to: 

Load a fresh system (1.L) (default) 

Preload from tape (2. A) 

Initialize RMS device labels (3. I) 

Initialize permanent file tables (4.1) 

This procedure corresponds to an Initial (1.1) deadstart of SCOPE 3.3. 

To guarantee the system mass storage file will reflect the current deadstart 
tape option, the following procedure is necessary when SCOPE 3.4 is 
deadstarted: 

Load a fresh system (1.L) (default) 

Preload from tape (2. A) 

Check existing RMS device labels (3.C) (default) 

Process existing permanent file tables (4.C) (default) 

This procedure corresponds to a Normal (1.N) deadstart of SCOPE 3.3. 
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When SCOPE 3.4 is deadstarted, and this deadstart tape was the last one used 
with the preload from tape (2. A option), it will be necessary to: 

Load a fresh system (1.L) (default) 

Load from the system mass storage file (2.B) (default) 

Check existing RMS device labels (3.C) (default) 

Process existing permanent file tables (4.C) (default) 

Basically, this procedure corresponds to a Normal (1.N) deadstart of SCOPE 
3.3; but the time-consuming process of copying the deadstart tape to mass 
storage (preloading) is bypassed. 

DEADSTAPTING A DUAL PROCESSOR 6000 
In SCOPE 3. 3: 

With corrective code transmitted for SCOPE 3.3 PSR SC30915, it is possible 
to deadstart on CPU-B of a dual processor system if CPU-A is inoperative. 
If the system is deadstarted on CPU-B, CPU-A is turned off and locked out 
by deadstart and MTR. This option allows the user to deadstart on CPU-B, 
keeping CPU-A down until it is fixed, and still carry on limited 
production with CPU-B. 

The only change to the regular deadstart procedure is to set bit 2**5 (bit 
5 relative to zero) of word 7 on the deadstart panel (SET=SWITCH UP). 
This applies to all initial, normal, and recovery deadstarts. 

In SCOPE 3.4: 

Another deadstart option appears on the Operator Option Matrix to provide 
for a dual processor 6000 (assembled only if IP.MCPU=2) . This option 
provides the capability to: 

1. Deadstart on CPU— A and keep CPU— B active to the rest of the Operating 
System. 

2. Deadstart on CPU-A and turn off and lockout CPU-B to the rest of the 
Operating System. 

3. Deadstart on CPU-B and turn off and lockout CPU-A to the rest of the 
Operating System. 

For this option to work, CMR must be configured for dual CPU*s. If 
the user turns off either CPU, that CPU is locked out and cannot be 
turned on again until another deadstart is performed. 
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Deadstart Configuration Suggestions 

The released values of default parameters in the Operator Option Matrix are 
determined by a conditional micro in the deadstart parameters common deck 
DSLCOM. The default MICRO OPTDF determines the initial values for the 
options. The MICRO appears as follows: 

OPTDF CMICRO 1 , , $LBCCNNYNN$ 

the default of the options appear from left to right in the MICRO, with L=1, 

B=2, etc. To change a default value, insert a micro (named OPTDF) with the 

desired changes at DSLCOM. 11. 

The options in the MICRO as released are as follows: (left to right in the 
micro string) : 

1.L ACTION 

2.B SYSTEM 

3.C RMS LABELS 

4.C PERMANENT FILES 

5.N SYSTEM PERMANENT PACKS 

6.N EQUIPMENT CHANGES 

7.Y RMS pre-allocation 
The following two values may or may not be defined. Their assembly is 
governed by the IPARAMS symbols IP.ECSB and IF.MCPU. 

8.N ECS or OFF CPU 

9.N OFF CPU 

All symbols described below are defined in the common deck DSLCOM. Default 
values are shown. A 49K memory is assumed. Central memory usage by deadstart 
may be modified by changing the symbol values at DSLCOM. 11. Most symbols are 
keyed from a symbol defining an adjacent area, and all depend on the value of 
the symbol BASE. For example, if a 13 1K system is to have an unusually larqe 
CM resident library, it may be necessary to set the origin address of IRCP 
(IRADR) to a higher value redefining BASE to any arbitrary address in the 
middle of CM. In either a 65K or 13 1K machine, ample space is available to 
enlarge both the CM resident area and the RBT area. 



1-1-38 60307400 A 



BASE 

CMRSIZE 

PPOSVADR 

CHPR 

CNTPR 

DFLTDT 

urijxv-iiiN 

DSPLCHAN 

DSPLCTLR 

ROCKCNT 



CEQU 

CEQU 

CEQU 

CEQU 
CEQU 
CEQU 
CEQU 
CEQU 
CEQU 
CEQU 



120000B Location from which origins of other areas 
are keyed. 

17000B Number of words in CMR to be saved for 
recovery purposes. 

BASE Address in CM at which contents of PPO will 
be saved for dump purposes. 

12B Dump printer channel number. 

3 Damp printer controller number. 

2RLP Default dump printer mnemonic. 

2R63 Default dump 512 printer chain type. 

10 B Display channel number. 

7 Display controller number. 

Retry count for tape parity error. 



10B 
The following dependencies and constraints must be observed: 

1 . 



The central memory resident library programs must not extend past IRADR, 
or loading cannot complete; if they do, BASE must be redefined. 

7 IRCP must not be larger than BASE - IRADR (15000B) ; or it will overlay 
2 - HSLJS^LJ££„<" +be driver overlays. An assembly error will occur if 

an iV att4m P t is'^madelo generate an iRCP larger than the current value or 

BASE - IRADR. 

1100B words. 

,. fl „,* rMP is save a for recovery, the number of words to be moved is 

x.o tue =>«-cii.»» Oj. n»* •"»— — — - 

must be redefined. 
5 it is strongly recommended that the origin of BASE be at machine FL minus 
^Lximum length of RBT area ♦ 3000B ♦ MAX(10200B,CMRSIZE) ) . 
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System ECS Resident Library 

tr°^ E ils\7lloPE E T^ittT r °^ ines are no lo ^ er ^ the direct user access 
area (as in SCOPE 3.3); rather, they occupy a part of the paged area. The 

^^li^ 1S deflned ±n termS ° f a ? a ^ stack ™* accessed though a CMP 
central processor program (CP.CIO) . y v ' ni< 

The definition and usage of ECS in SCOPE 3.4 is unlike the BNL ECS of previous 
versions of SCOPE. The following approach provides system ECS residency? ?cs 
^?^ Cy cannot be specified via EDITLIB creation of the deadstart ?ap4. An 
EDITLIB run must be performed after deadstart to move routines from their 
residence as loaded by deadstart to ECS. 

When EDITLIB creates a deadstart tape, it terminates the tape with a double 
end-of-file effectively creating a null file followinq the last system 
library file on the tape. During the pre-loadina process (alter system 

a'iob^f th1 S fn a r ^^ S° pi f d t0 . maSS St ° rage) if ^^iast file is not null? 
a 30b of the following structure is assumed: ^j-j-r 



Job card. 

EDITLIB (SYSTEM) 

7/8/9 

EDITLIB Directives 

6/7/8/9 



Ihe S f^ll :ing pa\a^te1s:° "*" ^"^ "* catalo 9 ed as * P er m anent file wit! 



LFN = ZZZZECS 
PFN = ZZZZECS 



ID = SYSTEM (granted automatically for control point PF operations) 
TK = SYSECSLIB 



XR = ECSLIB 



This job will be run automatically by the Terminate Deadstart Sequence PP 
program (TDS) whenever ECS is up and the SYSTEM level (option 2? is either A 
(preload from tape) or B (load from the system permanent file) . 



Because of 
operations. 



restrictions imposed for system (control point 0) permanent file 

, a user cannot catalog a new file with an ID of iy^tvm ti™- 

ZZZZECS can be created only in the manner just described? Thereafter) the job 
can be modified by new-cycle catalog and old-cycle purges with thl appropriate 
permissions (IC=SYSTEM allowed and r *n„ir-~xx * appropriate 



permissions (IC=SYSTEM allowed and required) . 



1-1-40 

60307400 A 



INSTALLING PERMANENT FILES 

Permanent File (PF) Devices 

To indicate which devices can hold permanent files, installations must define 
the PFD device and one or more permanent file devices via the EST macro. The 
PFD device need not be defined as a permanent file device. However, it is 
recommended that the PFD device be distinct from the system device. A PFD 
device must exist since the running system is maintained on a permanent file. 

Parameters 

Each installation may customize the permanent file structure by modifying the 
options according to the following instructions. 

In the released system, permanent file parameters are defined as listed below. 
The installation can change them with CEQU statements inserted in the 
installation deck SCOPE1 when SCOPE is assembled. These installation 
parameters appear in COMDECK PFMIP at the line sequence number shown in 
parentheses . 



I P. ARCH 


CEQU 


1 


(PFMIP. 7) 


IP.MREWR 


CEQU 





(PFMIP. 9) 


IP.PFABT 


CEQU 





(PFMIP. 10) 


IP.PP 


CEQU 





(PFMIP. 11) 


IP. US 


CEQU 





(PFMIP. 13) 


IP.PFAC 


CEQU " 





(PFMIP. 15) 


IP.PFRP 


CEQU 


10D 


(PFMIP. 14) 


IP . UP 


CEQU 


tob 


(PFMIP. 12) 


IP.RPMAX 


CEQU 


999 


(PFMIP. 16) 


Lddition, the 


following 


permanent 


file paramet 


N.SD 


CEQU 


11D 




N.RBTC 


CEQU 


20D 




N.ESD 


CEQU 


32D 




L.APF 


CEQU 


30D 





IP.PFAC (PF Accounting Feature) (0) 

Accounting parameter is taken from the permanent file directive with 
the AC keyword. 

1 Accounting parameter is taken from the control point area word, 
W.CPFACT. Contents of this word are supplied by the installation. | 

IP.PFABT (Permission Abort Override on user calls with the RC or RT bit set in 
FDB) (0) 

All permanent file return codes greater than 67B will flag fatal 
errors. 

1 All permanent file return codes will flag non-fatal errors. 
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I P. ARCH (Archive Feature) (1) 

Permanent files dumped under a Mode 2 permanent file DUMPF: 

No longer will have an RBTC entry and will not be retrieved from tape 
at ATTACH time. 

1 RBTC entries will be retained and will be retrieved from tape at 
ATTACH time. 

2 RBTC entries retained but will not be retrieved from tape at ATTACH 
time. 

If IP.ARCH=1: 

If an installation has system modifications which require accounting 
information before a job can come to a control point, changes must be made to 
the routine 1PF to insert appropriate information into the control stream of 
the job that performs archive file retrieval. 

A.ny accounting information needed by the installation must be inserted into 
the control card buffer. This card or cards, including the job card, must be 
formatted according to installation procedures, using DIS or DATA statements. 
Each DIS or DATA that completes a card must be followed by a call to the PAD 
macro, which pads the card with zeros. 

JOBNAME must be set equal to a valid, five- character, local file name to be 
used in setting up the input FNT for the archive retrieval job. 1PF will add 
two random digits to this jobname before storing it into the FNT. JOBNAME 
should be the same as that used on the job card. No CM, tape, or priority 
requirements need be on the job card, as 1PF sets up the input FNT with all 
such requirements satisfied. 

Example 1 (accounting information on job card) : 

*D PTR9312.53 

CARD1 DIS ,*JBNME. ACCOUNTING INFORMATION.* 

PAD 
*D PTR9312.71 
JOBNAME DIS ,*JBNME* 

Example 2 (accounting information not on job card) : 

*D PTR9312.53 

CARD1 DIS ,*ACCODNTING INFORMATION* 

PAD 
CARD2 DIS ,*FGHIJ.* (jobcard) 

PAD 

*D PTR9312.71 
JOBNAME DIS , *FGHIJ* 



I " 1 " 42 60307400 C 



IP.MREWR (Multiple Rewrite Access) (0) 

nLJ; hiS + P a " meter ^ s f et . to °ne, multiple modify access read access on a 
permanent file are allowed simultaneously. 

Installations are cautioned against indiscriminate use of this feature as the 
operating system cannot prevent two users from attempting to rewrite the same 
record at the same time. 

IP.PP (Installation Privacy Procedure) (0) 

If the installation uses the standard privacy procedure provided, this 
parameter should be zero. An installation's own privacy procedure routine 
must be a PP program. This parameter should be the program's name. 

IP. US (User Slot Size) (0) 



e 



When the installation reserves space (slot) in the RBTC for information to b« 
saved with each permanent file, this parameter is the space length in central 
memory words. ^^n^i.a.j. 

IP.PFRP (Default Retention Period) (10D) 

This parameter, 0-999 (decimal) is the number of days to be used as a file's 
retention period m the default case. The value 999 is interDretod *<, 
permanent retention. r 

IP.RPMAX (Maximum Retention Period) (999D) 

goo^ P^ ameter defines the maximum retention period for permanent files. Only 
111- allow f . a ^nfiriite retention period. All other values define the maximum 
retention disallowing infinite retention. 

IP. UP (Universal Permission) (10B) (17E) 

_ „ ^.^ ^^^ u^i. C i.mj.nc ±>«JLitij.;s£ij.uris granted wnen tne Universal 

permission password is submitted. (see section on Universal Permission) Any 
combination of permissions can be granted, depending on the bit settings as 
shown below: 

Control (8) 

Modify (4) 

Extend (2) 

Read (1) 
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L.APF (APF table length in CM words) (30D) 

This value, an integral multiple of LE.APF, defines the APF table length which 
is low-core resident. 

LE.APF (Length of an APF entry) (2) (Defined in COMDECK PPSYS) 
This parameter defines the length of an APF entry. 

N. SD (Number of Sub-directories) (11D) (17D) 
The value selected should be a prime number. 

N.RBTC (Length of RBTC) (20D) 

Length of the RBT catalog in PRU»s divided by 16 (decimal) . 

N.ESD (Sub- directory Length) (32D) 

Decimal number of PFD entries per sub-directory (4 entries per PRU). If N.ESD 
is not a multiple of 32D, it will be rounded up to the nearest multxple of 32. 

A cross reference listing of the PFMIP parameters follows: 



FFHIF 

IF. ARCH 1PF PFA DPF 

IP.MREHR PFC 1PF PFA 

IF.FFAET PFC 1FC PFA 



IF.RFHAX 

IF.UF 
IF. US 



1PF 


PFA 


PFC 


1PF 


PFC 


IFC 


iFC 


PFR 


IPC 


PFC 


PFS 


DPF 


PFC 


iFC 


IPC 


PFC 


PFS 


DPF 


PFA 




IFC 





LPF PFF PFE PFR IPO PFS 



S:ES Jpc pfc 

TPT 
It'll r™ SS TA L 1FC K! LPF PFF PFS PFR IPC 



TPT 
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Procedures 

Size of Directory 

Before a permanent file manager can be customized for an installation, the 
size of the permanent file directory must be determined by estimating the 
maximum number of unique file names to be allowed in the system. (The actual 
number of files can be five times this number.) The maximum number of unique 
file names is determined by the number of entries per subdirectory (N.ESD) 
times the number of subdirectories (N.SD) . After estimating the number of 
file names and allowing a sufficient margin for expansion (at least 25 
percent), the number of subdirectories must be determined (N.SD). In the PFD, 
files are found by hashing the ID to a subdirectory. Overflow is to the next 
highest subdirectory. Because of the hashing scheme, the more subdirectories 
the better. However, an FNT (3 CM words in low core) is required for each 
subdirectory. The number of subdirectories should be dictated by the number 
of FNTs the installation wants to allocate* The ID hashing algorithm 
optionally will distribute the files to the subdirectories if the number of 
subroutines is a prime number. 

Size of Catalog 

Each permanent file cycle has an RBT catalog entry of variable length; the 
minimum is 15 CM words. The average length of an RBT catalog entry for a 
given system is dependent on the average size of a permanent file. If the 
size of the RBT chain for the average file was calculated, the size of the 
average RBT catalog entry would be 15 CM words (minimum length of RBT catalog 
entry) plus the size of the RBT chain for the average file (CM words) plus the 
value chosen for IP. US. (These averages are relative to a given 

multiplied by the total number of permanent file cycles allowed by the 
installation, as determined by the size of the PFD. This product would give 
the suggested size in CM words of the RBT catalog. This number then could be 
converted to the number of PRUs needed. N.RBTC should be equated to the 
number of PRUs needed, divided by 16. 

RBTC space is reused, The size of the RBTC, if calculated by this algorithm, 
allows . for five cycles for every permanent file. Normally, this many cycles 
will not be needed. Therefore, the installation may want to decrease the 
initial estimate. 

Size of APF Table 

The APF table contains two-word entries and is central memory resident. Every 
attached permanent file active in the system as opposed to files merely 
cataloged, must have an APF entry. Number of APF entries (L.APF) limits the 
number of permanent files attached simultaneously by all jobs in the system. 
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Other Parameters 

Other installation parameters that must be assigned values are described 
below. 

The default retention period (IP.PFRP) for permanent files is decided by the 
installation, based partly on the amount of available mass storage. 

If an installation writes its own privacy procedure routine, IP.PP should be 
equated to its name. In this case also, if space is required for installation 
information, it may be reserved within each RBTC entry by equating IP US to 
the number of CM words. The only restriction on this option is that no" word 
should start with two bytes of 7's. This option affects the minimum size of 
the RBTC entry and may affect the size of N.PETC. 

Universal Permission 

By setting the parameter IP. UP non-zero, a universal permission code mask may 
be defined. This mask is the combination of permissions to be granted when 
tne universal password is correctly submitted; it consists of two octal digits 
as follows: 

01 Read permission 04 Modify permission 

2 Extend permission 10 Control permission 

Thus, if IP. UP were defined as 1 3 (octal) , Read, Extend and Control permissions 
(but not Modify permission) would be granted when the universal password was 
submitted. 

The universal password (nine characters) is defined by the installation and 
assembled into the PF routines as in the following sample: 

♦DELETE PREAMB. 152 

UNIV DIS , *UNIVRPERM* 

As released, IP. UP is set at 10 (octal) , granting only control permission. 
This is externally identical to the 3.2 and 3.3 release; and as only control 
permission is granted, privacy is not threatened. 

Public ID Permission 

If a permanent file has the ID of PUBLIC, the ID parameter need not be 
specified on all permanent file directives. In other words, ID of PUBLIC is 
the default ID. Since the ID is used to locate files in the PFD, it is not 
desirable that many files have the same ID. Therefore, an ID permission 
password must be supplied at catalog time to allow a file to be cataloqed with 
the ID of PUBLIC. y ' 

The PUBLIC ID password (nine characters) is defined by the installation and 
assembled into the PF routines (identified by PREAMB. 153). 

IDPERM DIS ,*PBLICPERM* 
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Privacy Procedures 

Specialized needs of any installation may be met by including their own 
privacy procedures. Each privacy procedure written for a specific 
installation must be a PP routine executable in two modes: CATALOG and ATTACH, 

Privacy procedures written for SCOPE 3.2 or SCOPE 3.3 will not run under SCOPE 
3.4. 

Installation parameter IP.FP must be defined as non-zero for individual 
privacy procedures. The parameter, consisting of the three characters of the 
PP routine name, must be unique within the system. For a CATALOG or ATTACH 
function, the permanent file manager checks IP.PP; if non-zero, the permanent 
file manager calls that routine and does not execute its privacy routine. 

Method of Call 

When the CATALOG or ATTACH function calls an installation privacy procedure, 
the address of the FDB+4 is put into the function input register. The PF PP 
routine will call the privacy procedure into its PP. The privacy procedure 
will save and restore the last three words of the message buffer and then call 
the PF PP routine. The PP routines should call each other in the same way by: 
setting bit 41 to 1 in the input register, putting the name of the PP routine 
to be called in the input register, and jumping to R.IDLE. 

A new cycle catalog will be flagged by non-zero bits 24-3 5 of the input 
register. 

■Tl-i ivm *■£■ n-x 1 1 

The CATALOG mode call is made at completion of the CATALOG function, prior to 
unlocking the APF entry. At this time, passwords may be saved, any additional 
parameters can be extracted from the FDB, and other manipulation carried out. 
Care must be taken to avoid information changes that will cause a PFM abort. 

The ATTACH and newcycle CATALOG mode calls are made instead of calling the 
system password checking routines. The privacy procedure must include its own 
password checking and store resultant permissions in word 6 of the PP message 

u., jrjr 

UUi.l«J, • 



The PP parameter is available to the installation privacy routine; it can be 
used to pass up to nine display-coded characters from the user to the routine 

via the FDB. 
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Tables 

Shown below are the contents of the input register and the last 3 words of the 
PP message buffer when another permanent file PP routine of privacy procedure 
is to be called: 



ByteO 



Byte 1 



Byte 2 



Byte 3 



Byte 4 



Input Register 
59 



47 



41 



35 



23 17 11 





I II 

III- 

1 1 1 


Nonzero if 

New Cycle 

Catalog 









PP Routine Name 



Address of FDB+4 



Word 4 of PP Message Buffer 
59 47 



35 



29 



23 



Word 5 of PP Message Buffer 
59 47 



35 



23 



17 



11 



Return 
Address 


SUBD 
(9 bits) 


SDFNT 


APFO 


UFNT 



11 



RBTA 


RBTO 


PRU 


I 
Entry Mode 

I 


CPT FLGS 



PFD Entry Pointer 



Word 6 of PP Message Buffer 
59 47 



35 



23 17 



11 



RBTA 


RBTO 


PRU 


I 
Entry 

l 


Cycle (10 bits) 



RBTC Pointer 
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Assembly Options 

Delay Limit 

At times during execution, permanent file manager routines may be delayed 
because an interlock is not available. If a routine delays longer than 1000 
milliseconds, the event stack is used; a lesser delay is implemented within 

the PP. 

Delay Times 

Two specific delay times, associated with different interlocks, are specified 
in the routines; they can be varied for optimum performance. The system is 
released with the decimal values shown below. 

APFDLY EQU 1 Wait, APF table (PREAMB. 108) 

RWDELAY EQU 100 Stack processor interface 

delay (PREAMB. 109) 

The CM table delays are set to one millisecond each. 



Converting Files from SCOPE 3.2 or 3.3 to SCOPE 3.4 System 

Because table formats differ for permanent files depending on the version of 
SCOPE, files cataloged under SCOPE 3.2 or 3.3 cannot be accessed immediately 
by SCOPE 3.4. 

To facilitate file conversion, the LOADPF utility in 3.4 accepts dump tapes 
created by SCOPE 3.2, or 3.3 permanent file manager. When LOADPF detects 
input, automatic conversion takes place if the LP parameter is used on the 
LOADPF control card. For files created and dumped under 3.2 or 3.3 systems, 
backup tapes should be reloaded onto the system after Initial deadstart of 
SCOPE 3.4. 



Automatic Accounting Feature 

This feature is activated by setting IP.PFAC=1, when the system is assembled. 
It is included for accurate accounting of charges for system resource use. 

The installation must provide a PP routine (part of its own accounting 
routines) , to store the user's account number into each control point area, in 
word W.CPFACT. This account number is presumed to have been taken from the | 
job card or elsewhere. The identification, 1 to 9 alphanumeric display-coded 
characters, has the following format. 

59 5 



Account Number (Right Justified Display Code) 



16 



The account number should be right justified to the 16 code (octal) and left 
filled with binary zeros. 
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SCHEDULING PARAMETERS 
Definitions: 

1. Minimum queue priority (MINQP) The priority with which a job will first 
enter the CM queue. 

2. Maximum queue priority (MAXQP) The maximum priority level a job in the 
CM queue may achieve while waiting for scheduling. 

3. Base quantum (BQ) The amount of time that a job, once brought to a 
control point, will maintain a high enough priority to avoid being swapped 
out by another job. 

4. Quantum priority (QP) The priority given to a job when it has been 
swapped-in. The job maintains that priority for the duration of its base 
quantum. 

5. Age rate (AR) A factor used to weight the priority of a job according 
to the time it has spent in the CM queue. 

The above parameters apply to each of the available classes of jobs. Each 
class serves to define a series of jobs by their common characteristics, such 
as response time requirements or the minimum amount of time that a job has 
access to core. 

The five classes are: 

BATCH 

DEVICE (BATCH with non-allocatable devices) 

INTERCOM 

MULT I- USER 

EXPRESS 

When a job requests scheduling for central memory, its Job Descriptor Table 
entry is placed into the central memory queue with a queue priority equal to 
the minimum queue priority of its class. Its priority is evaluated according 
to: its minimum queue priority, the age rate of the class, time in the queue, 
and the job card priority. When the priority of the job reaches the maximum 
for the class, aging ceases. This priority evaluation is performed for all 
jobs in the central memory queue, and the results are compared with the 
priorities of those jobs at control points. When a job is swapped into 
central memory, it is given a priority equal to the quantum priority of its 
class. 

When the quantum of the job has elapsed, its priority is reduced to the 
minimum of its class. 

Since it requires some overhead to swap a job, the quantum permits a job to 
remain at a control point for a reasonable length of time before it becomes 
eligible for swapping. The quantum of a job is considered elapsed when the 
job has used a specified amount of CPU and/or PPU time. 

All priorities for a class, excepting MAXQP, are weighted by job card 
priority. 



1-1-50 60307400 C 



The following figure illustrates the interaction between two classes, batch 
and INTERCOM and displays in a graphical form, the relationship between the 
parameters of these two classes. 

BATCH/INTERCOM CONSIDERATIONS 



QUANTUM 
PRIORITY 



MAXIMUM 

QUEUE 
PRiORiTY 



QUANTUM 
PRIORITY 



MINIMUM 

QUEUE 
PRIORITY 




BATCH 



INTERCOM 
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The assumptions used in formulating this set of parameters were that the 
response time for INTERCOM users should fall within certain bounds, 
irrespective of the batch loading; that, once a batch job is executing, it has 
a guaranteed period of execution before competing with other batch jobs; and 
that a batch job be allowed to execute a minimum period before a swap out can 
be forced by an INTERCOM job. Within the batch class, the aging between the 
minimum queue priority and maximum queue priority (interval A) is intended to 
ensure that, job card priority considerations aside, the first batch job to 
enter the central memory queue will be the first job to be swapped into 
central memory. The minimum queue priority for an INTERCOM job is greater 
than the maximum queue priority of the batch job (interval B) so that INTERCOM 
jobs will not have to compete with batch jobs waiting for central memory. 
Aging of jobs in the INTERCOM class serves two purposes: Firstly, as in the 
batch class, to ensure first into the central memory queue - first into 
central memory. Secondly, to allow INTERCOM jobs, after a certain period of 
time has elapsed, to force the swap- out of a batch job in order that the 
INTERCOM job may run. 

The extra increment D, between the quantum priority of a batch job and the 
maximum queue priority of an INTERCOM job, allows INTERCOM jobs to be 
selective in the batch jobs that are swapped-out to provide core, by becoming 
eligible to swap, first of all, low job card priority batch jobs and, 
eventually, to be able to force out even the highest job card priority batch 
jobs. The interval D can be set smaller than the total range of the job card 
priority values. By doing so, those jobs with a very high job card priority 
will not be forced out by INTERCOM jobs before their quantum has expired. The 
interval E between the maximum queue priority and the quantum priority of 
INTERCOM jobs is used for similar purposes as interval C in the relationship 
between INTERCOM jobs and the next higher class of users. Similarly, this 
also will allow INTERCOM jobs to run to their quantum before they start to 
compete for central memory with other INTERCOM jobs. 

The following list is the default set of parameters, as they appear in^CMR. 
The parameters selected provide good through-put for an installation running a 
heavy load of batch jobs, as well as provide good response time for a 20- 
terminal INTERCOM system - where an average of ten terminals are active at any 
one time. 
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SCHEDULER PARAMETER SETTINGS 



MAXNBA 

* 

MAXNDE 

* 

QHINP 
BQINF 



•MINQPBA 

MAXQPBA 

ARBA 

QPBA 

BQ8A 



MINQPQE 

WAXQPQE 

ARDE 

QPDE 

8Q0E 



NINQPIN 

NAXQFIN 

ARIN 

QPIN 

BQIN 



NlNQPMUJ 

NAXQPMUJ 

ARMUJ 

,QPMUJ 

■BQHUJ 



MINQPEXP 

NAXQPEXP 

AREXP 

QPEXP 

BQEXP 



GEQU 30B 
CEQU 108 
CEQU 22Q0B 

CEQU ■' .2.00-08. 

BATCH CLASS 



CEQU 
CEQU 
CEQU 
CEQU 
CEQU 



1DOB 
1 OTTOS 

•rB 

140 OB 
2000B 



DEVICE CL«SS 



CEQU 
CEQU 
CEQU 
CEQU 
CEQU 



2008 
10H OB 
108 
14008 
2O0OB 



INTERCOM 'CLASS 



CEQU 
CEQU 
CE QU 
CEQU 
CEQU 



iliOB 
24MB 
10008 
25008 
2008 



MULTI-USER CLASS 



CEQU 
CEQU 
CEQU 
CE QU 
CE QU 



2 4108 
25.108 
2008 

3 00*08 
40008 



EXPRESS CLASS 



CEGU 
CEQU 
CECU 
CEQU 

eeeu 



1 OflOB 

32008 

*008 

3200B 

*00B 



PARAMETER 
DESCRIPTION 
MAX NO OF JOBS W/0 
NQN^ ALLOC EQUIP 
MAX NO OF JOBS WITH 
NON- ALLOC EQUIP 
INPUT QUEUE QUANTUM 
PRIORITY 

INPUT QUEUE BASE 
QUANTUM 



MI N QUEUE PRIORITY 
MAX QUEUE PRIORITY 
AGEING RATE 
QUANTUM PRIORITY 
BASE QUANTUM 



MIN QUEUE PRIORITY 
MA* IQUEUE PRIORITY 
AGEING RATE 
QUANTUM PRIORITY 
8ASE QUANTUM 



WIN QUEUE PRIORITY 
MAX QUEUE PRIORITY 
AGEING RATE 
QUANTUM PRIORITY 
BASE QUANTUM 



MIN QUEUE PRIORITY 
MAX QUEUE PRIORITY 
AGEING RATE 
QUANTUM PRIORITY 
BASE QUANTUM 



MIN QUEUE PRIORITY 
•MAX QUEUE PRIORITY 
AGEING RATE 
QUANTUM PRIORITY 
BASE QUANTUM 





CMR 


1016 




CMR 


1017 




CMR 


1018 


S DISPLAY 


CMR 


1019 


TYPEIN 


CMR 


1020 


MAXN1 


CMR 


1021 




CMR 


1022 


MAXN2 


CMR 


1023 




CMR 


1024 


QPO 


CMR 


1025 




CMR 


1.026 


BQO 


CMR 


1027 




CMR 


1028 




CMR 


1029 




CMR 


1030 




CMR 


1031 


MINQPl 


CMR 


1032 


MAXQPi 


CMR 


103 3 


AR1 


CMR 


1034 


QP1 


CMR 


1035 


BQ1 


CMR 


1036 




CMR 


1037 




CMR 


1038 




CNR 


1039 


MINQP2 


CMR 


1040 


MAXQP2 


CHR 


1041 


AR2 


CNR 


1042 


QP2 


CMR 


1043 


BQ2 


CMR 


14344 




CMR 


1045 




CMR 


1046 




CNR 


1047 


MINQP3 


CMR 


1048 


-MAXGP3 


CMR 


1049 


AR3 


CMR 


1050 


QP3 


CMR 


1051 


BQ3 


CNR 


105 2 




CMR 


1053 




CMR 


1054 




CMR 


1055 


MINQP4 


CMR 


1056 


MAXQP4 


CMR 


1057 


AR4 


CMR 


1058 


QP4 


CMR 


1059 


BQ4 


CMR 


1060 




CMR 


1061 




CNR 


1062 




CMR 


1063 


MINQP5 


CMR 


1064 


MAXQP5 


CNR 


1065 


AR5 


CNR 


1066 


QP5 


CMR 


1067 


BQ5 


CMR 


1068 




CMR 


1069 
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The two batch classes have low minimum and maximum queue priorities as well as 
low age rates. The device class has twice the age rate as the batch class, 
providing the device class with a scheduling advantage over the batch class. 
A device class job would experience, on the average, half the wait time of a 
batch class job. Since the device class represents additional resources being 
tied up, such as control points and tapes, it is preferable to get that job 
through the system with a minimal delay. 

The quantum priorities of the batch arid device classes are low enough so that 
INTERCOM jobs, having a high age rate, can force batch jobs to be swapped out 
after a one- half to two second delay, depending on job card priority and 
quantum considerations. 

The INTERCOM class job is given a small base quantum which normally will be 
enough time to execute an INTERCOM job step. The batch quantum on the other 
hand, is larger, preventing batch jobs from swapping other batch jobs 
unnecessarily. The multi-user class job, such as EDITOR, is given the highest 
priority because it can service several INTERCOM users simultaneously. 

The parameter MAXN determines the maximum number of batch or device class jobs 
which can run at any given time. The number of device class jobs is kept 
small; the determining factor being that device class jobs are rolled-out 
rather than swapped out; each job can make a control point unavailable for 
swapping. It is essential to keep a reasonable number of control points 
available for serving other jobs. The maximum number of batch jobs is much 
higher, a large number being preferable to provide the scheduler with a better 
pool of job candidates, allowing better core utilization. However, too large 
a job pool may adversely affect individual job turn-around while improving 
total system through-put. 

The two parameters QPO and BOO in the lower half of the S display are the 
Quantum Priority and Base Quantum given to jobs coming out of the input queue 
and entering a control point for the first time. The quantum priority is 
higher than that for normal batch jobs, enabling short jobs to run to 
completion without swapping. 

The express queue is given a high priority and aging rate, since it contains 
all jobs terminated by operator intervention. The quantum is small because 
the end-of-job procedure is minimal. This class was given express 
consideration under the assumption that these jobs would release valuable 
resources back to the system. 

SELECTION OF ECS INSTALLATION PARAMETERS 

The ECS extensions are designed primarily to improve the efficiency of an I/O 
bound system by: 

1. Buffering the sequentially accessed RMS files through ECS 

2. Swapping jobs to ECS 

3. Moving a part of the system library to ECS 

4. Allocating files in ECS 
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The default values of the ECSCOM configuration parameters are defined with the 
CEQU or CMICRO macros, so that an installation can insert all modifications at 
one given place. The CEQU and CMICRO macros are used to define variables 
conditionally. Since they are effective only if the variable have not been 
previously defined, any modifications should precede them. 

Installation parameters oriented, to ECS are defined in the COMDECK ECSCOM. 
Changes may be made at ECSCOM. 8. Default values, other tested values, and 
parameter descriptions are as follows: 

IP.EBUF (16D) 

Defines the default ECS buffer size in pages. To significantly improve system 
I/O, the ECS buffer allocated to a file should be at least four times larger 
than the buffer used in CM for the same file, resulting in a default value in 
the 10000 to 20000 (octal) words range. A larger ECS buffer (40K or more) 
does not provide any significant improvement compared with the default value. 

If an ECS buffered file does not overflow its buffer, it stays in ECS and is 
processed as an ECS resident file, possibly locking a very large amount of ECS 
for only one file. Buffer space is not reserved when the buffer is requested; 
it is allocated only when needed and released as soon as possible, one page at 
a time. Allocation of an ECS buffer to a file having a CM buffer 
approximating one RB does not improve throughput because of the scheduling 
algorithum used by the stack processor. 

IP.BDCT (1) (3) 

Number '1-3* of CM system buffers s Throughput may be improved by having a 
ratio of one system buffer per RMS device controller (maximum of three can be 
handled) . 



IP. ELIB (0) (60) 

If zero, the code for ECS resident library will not be assembled in the 
system. If non-zero, maximum number of words/1000 (octal) that may be used 
for storing ECS resident library programs. This value can be changed at 
deadstart time; however, it can be non-zero only if IP.ECSB is non-zero. 
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IP.ERES (0) (1) 

If set to one the ECS Resident File capability is activated. The ECS Resident 
File Option feature can improve system throughput for a given job by keeping 
large files (particularly random access) in ECS. However it can have an 
adverse effect on the overall improvement of the system by drastically 
reducing the amount of ECS available for job swapping, ECS buffering, and the 
system library. 

IP.EDAA (40B) 

Number of words/1000 (octal) reserved for ECS direct access. This value can be 
changed at deadstart time. 

IP. EPAG (8D) 

ECS page size in number of PRUs : 8*64=512 words. This value can be changed 
at deadstart time. Allocatable ECS is divided into pages. The size of a page 
is at least 64 words and, normally, a multiple of 64. A small page size (64 
to 2 56 words) will increase the system overhead for space management and a 
large size (2048 words and up) will increase the amount of wasted space. An 
initial setting of 512 or 1024 words page is a good compromise. 

IP.SBLG (8D) 

CM system buffer length in number of PRUs (minimum 4) : 2*(8*64+8) =1040 words. 
The CM system buffers are used by the stack processor to perform the RMS/ECS 
transfers. 

CM System Buffer 

A CM system buffer is used by each stack processor for the RMS/ECS transfers. 
Each independent RMS device should have one such buffer. Because of the CM 
conflicts, no more than three RMS devices can be driven simultaneously for ECS 
I/O buffering, therefore, the number of CM system buffers (IP.BDCT) is limited 
to 1, 2 or 3. 

The minimum size (IP.SBLG) of a CM system buffer is 4. PRU's (256 words). A 
size between 6 and 8 PRU's should be used to minimize the possibility of lost 
revolutions on RMS devices because of CM access conflicts that can slow down 
or lock out the stack processor. 

A cross reference of the ECS installation parameters is as follows: 
***** 

ECSCCM 
«***« 

IP.BDCT CMR 



IP.EeUF 



IRCP 



IP.E0AA 
IP.ELIB 
IP. EPAG 
IP.ERES 
IP.SBLG 



IRCP 

STL 

IRCP 

REQ 

CMR 



IRCP 



CMR 



1AJ 



T0S 
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MODEL JOBS FOR CREATION OF AN INSTALLATION DEADSTART TAPE | 

Installation of SCOPE 3.4 cannot be accomplished using SCOPE 3.2 or SCOPE 3.3 
as the running system. The unconfigured deadstart tape provided with the 
release must be used. 

The SCOPE 3.4 unconfigured deadstart tape requires the entry of EST entries 
for RMS, tape, and unit record equipment at deadstart time. A new assembly of 
CMR is necessary, with a configured program library and installation tape 
constructed as soon as possible, so that normal loading becomes feasible. The 
user is cautioned to review the NOTES AND CAUTIONS, in the early part of this 
section prior to building a configured system. The SCOPE 3.4 program library 
requires a full 2400-foot tape reel when it is recorded at 800BPI. 

The four jobs listed on the following pages, plus a small verification 
program, are included on the release PL1 ; they may be obtained by executing a 
job such as that listed below. 

Job SC0PE1 updates PL1 and places the assembled binary of the revised PL1 on 
tape BIN. Job SCOPE1 is set up assuming that ECS is present. If the ECS code 
is not activated, cards must be removed from the SC0PE1 Update record. To use 
the SC0PE1 deck for program library maintenance, remove the cards sequenced 46 
and 47 after initial installation. The updated system texts are added to the 
running system prior to assembling SCOPE. This effort, not required but 
strongly encouraged for initial installation, is recommended when subsequent 
system maintenance is to be performed. 

To install SCOPE 3.4 for use as a station front end, a card of the form 
♦DEFINE, STATION must be added to the update record of deck SCOPE 1. This card 
should be removed from the deck once a configured program library is created. 

Job SCOPE2 will create a configured deadstart tape containing SCOPE 3.4 from 
tape BIN and the balance of the running system. 

Job SC0PE3 will create a deadstart tape of the running system. 

Job SC0PE4 will install system text SYSTEXT in a form equivalent to CPCTEXT. 
ks present on the unconfigured deadstart tape and installed by 6RM 
installation decks SIXRM1 and SIXRM2, text SYSTEXT will be equivalent to 

I0TEXT. 

FORTRAN Extended 4.0 must be added to the running system prior to assembling 
SCOPE. 

To obtain the installation decks, perform a job of the type: 



Job card 

REQUEST,PL1,E,HY. 
REWIND (PL1) 
SKIPF(PL1,1 ,17) 
COPYBF ( PL 1 , PUNCH, 4) 
C0PYBF(PL1 , PUNCH, 1) 
UNLOAD ( PL 1) 
6/7/8/9 



Mount released PL1 



Punch installation decks 
Punch verification program 



If INTERCOM 4.1 is to be installed, the required IPARAMS and CMR modifications 
must be included in the SCOPE1 installation deck: the INTERCOM installation 
deck does not include provision for access to the SCOPE program library. 



60307400 C 



1-1-57? 



The unconfigured deadstart tape contains 3DO, 1S5, 1SX, 1SP and its 3Sx system 
device overlays as CM resident. If 1EP is DEFINEd, the MOVE directive COMMENT 
cards regarding 1EP and its system device overlays must be invoked within job 
SCOPE2. Routines established as CM resident in the running system will have 

CM residency on the new deadstart tape created by jobs SC0PE2 and/or SC0PE3. 

CAUTION: ECS residency cannot be carried on a deadstart tape: routines moved 
to ECS resident will be established as disk resident on a new deadstart tape. 
The only way to set ECS resident is via MOVE directive changes to the running 
system. 

If one additional CMR is to be added, these cards must be inserted behind the 
indicated sequence number of jobs SCOPE1 and SCOPE2. 



UPDATE (Q, P=PL 1 , C=COMP) 
COMPASS (I=COMP,S=PPTEXT,L=0) 



(After card 018 in job SCOPE1) 



*/ PLACE CMR CONFIGURATION HERE. 

♦COMPILE CMR 

7/8/9 



COPYBR(BIN,CMR1) 



REWIND (CMR 1) 
TRANSFER ( CMR , CMR 1 ) 



(After card 055 in job SCOPE1) 
Only installation parameters in 
the full update CMR will be 
assembled into the system. 

(After card 008 is job SCOPE2) 

(After card 023 in job SCOPE2) 
CMR from Q update 



If more than one additional CMR is added, the CMR parameter on the COPYBR, 
REWIND, and TRANSFER cards must be changed to reflect the additional CMR 
number, for example, CMR2, CMR3, etc. If multiple CMRS are to be added, 
multiple copies of the above card sequences are required. 

NOTE: The T7 000 parameter on the SCOPE 1 jobcard must be changed to T20000 if 
the deck is to be run on a 6200;T14000 on a 64 00. 
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SCGPEl,CM65000,T7QQGtMT02. 

COMMENT. THIS JCB UPDATES AND CREATES THE BINfiBV ne crnoc 00i 

SK: T T H * E E ss\Sk" edi TL1BE ° * J " * -»™ ss™« «"« :s 

COMMENT. THE NE* PL1 WILL BE THE OLDPL OF SCOPE 00 * 

SKMMiSS^SSS 1 BINARY 0F " Sp| " Kl .'K 

REGUEST,PL1,N,HY. SCRATCH FOR NEW PLl 009 

RE«INC(PL1IN,PL1) L1 010 

LABEL(PL1,W,L=SC0PE3P4,D=HY> 0ii 

RE KINO (PLl) 012 

UPCATE(F,P=FL1IN,N=PL1) 013 

COMMENT. *** THE FOLLOWING CARD COMPILES LDRTFXT thpii tdtcvt «»* Qlk 

COMPASS(I S CCMPILE,S=PPTEXT,B=SAVTXT,L=0) L0R7EXT THRU IPT "T — 15 

REKINO(SAVTXT) ' 016 

EOITLIB(SVSTEM). 017 

"Ss^c^^^^^r compiles cea thru oso ••• s« 

UNL0AD(PL1,FL1IN) 020 

SESSJ-.i-ccHftM^S^Ji;.?*" C0MPILES CI ° THRU EPF «* 

REklNO(LGO) 023 

REGUEST,BIN,HI. SCRATCH FOR BINARY ° 24 

RENIND(BIN) oaw«kt fl25 

COFYEF LGO,EIN. 026 

REWIND LGO. 027 

co ^ E ss; 1 =cc M m E ^ E sc%\ L S?^,? AR ° C0NPIlES PFCCP THRU s * s " 

COMMENT. ♦»♦ THF FQ1 1 OMflUC r>*nr ^Aun*. --. ...___ _ ._ 

FTN(I S COMPILE,S=CPCTEXT;b*OVl1,L«0) ° uMrxutS AijDlT » DMp ECS AND PFOUMP 

NOGo! CVLS> GENERATION OF OVERLAYS J** 



028 
029 
030 
031 



034 
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035 

REWINC(SCF) 036 

COFYBF(SCF,LGO) 037 

BKSP(LGO,i) 038 

REWINOtSAVTXT) 039 

COFYBF(SAVTXT,LGO) q^q 

REMIND LGO, 0/tl 

COFYEF(LGC*EIN) 0^2 
UNLOAD(BIN) 

7/8/9 END CF RECORD 0^4 

*/ ADC CCRRECTIONS HERE , Mirei TklTTT «i tmctaiiatton 0*5 

V REHOWE CARDS SEQUENCED * fc AND k7 AFTER INITIAL INSTALLATION jj^ 

♦DEFINE, 1EP NU 

7/8/9 ENO CF RECORD fl49 

REAOY(SYSTEM,OLO). 050 

LIERARY(NUCLEUS,OLD). 051 

REFLACE(LORTEXTHPTEXT,SAVTXT) Q52 

FINISH. 053 

COMPLETE. 05* 

ENGRUN. 

7/8/9 END CF RECORD 

6/7/8/9 ENO OF FILE 

COMMENT. JOB SCOPE! AND THE BALANCE OF THE RUNNING SYSTEM (FRODUCT SET uu^ 

COMMENT. MEMBERS). 005 

COMMENT. THIS JCB IS SET UP FOR ONE CHR. 

sffi?:s».«». M0UNT BIN i^Sh^Ho^^os^ 

COFYEF(BIN,NUC) SCOPE CF ROUTINES m 

REWIND, BIN, FPLIB,NUC« 012 

EDITLIB(SYSTEM) 013 

UNLOAC(BIN,NEWSYS) 01* 
COMMENT. *** END OF JOB *** 

7/8/9 ENO CF RECORD 01 6 

REAOY(NEHSYS) 017 

REWINC(SYSTEM) 018 

REWINO(PFLIE) 019 

TRANSFER(CEA,PPLIB) 02 o 

*/ IF AD£ ,S TR T ANSFER(12»SYSTEM) IF CEOIAGNOSTICS IN RUNNING SYSTEM 021 

TRANSFER(CEC*OMT,PPLIB) 023 

SKIPF(1*,PFLIB) 02^ 

TRANSFERER, FPLIB) FROM FULL UPDATE Q25 

SKIPB(15,PFLIB) 026 

TRANSFER(CCMHRCP,PPLIB) 027 

SKIPF(1,FFLIB) 028 

TRANSFER(*>FPLIB) 029 

INCLUCEP(SYSTEM) Q3 

INCLUOE(NUCLEUS, SYSTEM, CM) 031 

INCLUCE(SYSOVL, SYSTEM, OS) 032 

INCLUCEtFCRTRAN, SYSTEM, DS) 033 

INCLUDE(COBOL, SYSTEM, DS) 03 ^ 
INCLUCECRUN2P3, SYSTEM, DS) 
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INCLUDE (SYSIO, SYSTEM, DS> 035 

INCLUDE (SYSHISC, SYSTEM, OS) / 036 

INCLUDE(IGS274, SYSTEM, OS) 037 

REFLACE(*,PPLIi) 038 

*' IF ECS TURNED ON ADD CARDS ^— NOTE 039 

*/ M0VE(1EP,CM) 040 

*/ MOVE(3EP*3ES,CMI 041 

S£TAL(DIS,i> 042 

SETAL(DMF,1> 0^3 

SETAL(VSK,i> 044 
SETAL(LOC,l) 

LIERARY(l*UCLEUS,OLO> 045 

R£FLACE(PFCCF,KUG,AL*7777,FL*2 000,FLO=0) 046 

REPLACE (LOACPF,KUC,AL=7777,FL=3100Q,FLO=0> 047 

REFLACE(TRANSPF,NUC,AL*7777,FLsiQO00,FLO=0l 048 

REFLACE(CUKFF,hL^,AJL^7777,FL=2000Q,FLOaQ) 049 

REFLACE<REGL£ST,NUC,ALs3,FL*208Q,FLG*Si 050 

REFLACE (RESTART, NUC,AL*7777,FL*250Q0,FLO»0> 051 

REFLACE(CGPYXS,NUG,AL»7777,FLs 20000, FLO*01 052 

REFLACE(SEGElLD>SEGRES,NUC,AL=7777,FL*60QQO,FLGsl> 053 

R£FLACE<LCAC,NLC,AL*7777,FL=3e00e,FLG*lJ 054 

REFLACE(LqACC+yCLOAO,NyC,AL=0) 055 

RE PLACE ( LIBRARY, NUG,AL«7777,FLs 38 Q,FLQ*0) 056 

RE PLACE (LpA00U0AQO3,NUC,AL = 0> 057 

REFLACE(CCHEINE,NUCjAL=7777,FL=20000,FLOs0) 058 

REFLACE(XXXRESG*XXXOMPQ,NUC,AL*7777,FL»iOOO0,FLO*O) 059 

REFLACE(EDITLIE,NUC,AL*3,FL=45000,FLG*1) 060 

REFLACE(EDITSYS*EDITIJSR»NUC,AL=Q) 061 

R£PLACE<CqFY§GO,NUC,AL*3,FL*2O0O0,FLQ*O) 062 

REFLACECLAEEL,MJG,AL«7777,FL=2000,FLOs0) 063 

REFLAOE(CGFYL»NLG,AL*5,FLs20QG0,FLGs0) 064 

REFLAGE(LIST»'F,KUC,AL*7777,Fl*1008,FLO=0) 065 

REFLACE(CPCHG,KUC,AL*8) 066 

REFLACE(CCMFARE,NUC,AL«3,FL=7000,FLO=0) 067 

R£FLACE(CHEKPT,NUC,ALs7777,FLs300,FLO*0) 068 

RE PLACE (TRAP, NUC,AL=7777,FL*20 000, FLO=l) 069 

REFLACE<TR«FPEfi,NUfc,AL*0) 070 

RE PLACE (SETCCRE |NWC,AL*7777 » FL-30C00,FLGsi) qj± 

REPLACE(BKSF,NUC,ALs3,FLsl000,FLOs0) 072 

REPLACE (COPY *GGPYBR,NUC,AL*3,FL=20000,FLG*0> 073 

REFLACE (COFYN,NUC,ALs3,FLs6000,FLOsO) 074 

REFLACE(COPYSBF,NUC,AL=3,FL=20000,FLO»Q) 075 

REPLACE(REWINC,NUC,AL*3,FL=2000,FLCsO) 076 

RE PLACE (LNLCAO»RETURN,NUC,AL*l,FL*20flfl,FLO=0> 077 

REPLACEaPGATE,NUC,AL=3,FL=^OQOO,FL0«OI 078 

REPLACE(SKIPE4SKIPF,NUC,AL=3,FL=10(0,FLO*0l 079 

R£PLACE(TRAhSRfTRANSF,NUC,AL«7777,FL*200,FLO*0) 080 

REPLACE(CISFGSE,NUC,AL=3,FL=0,FLO*8I 081 

REPLACE(RECCVR,NUC,AL*0) 082 

REPLACE ($SYS.RH$,NUC,AL=0> 083 

REPLACE(AUDIT,KLC,AL=3,FL=3500 0,FLO=05 084 

REPLACE (CMP ECS, NUC,AL=7777,FL=30000,FLO=0) 085 

REPLACE(PF0UMP,NUC,AL=3,FL=35000,FLOs8) 086 

R£FLACE(LDRTEXTHPTEXT,NUC,AL=0) 087 

FINISH. 088 

LIERARY(RUN2P3,0LD) 089 

REPLACE(R23RCVR,NUC,AL=0) 090 
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FIMSH, 091 

LIERARY(SYSMSC,OLD) 092 

REFLACE(F3CRCVR,NUC,AL=0) 093 

FIMSH. g^ 

COMPLETE. g5 

ENCRUN. 0g6 
7/8/9 ENO CF RECORD 
6/7/8/9 ENC OF FILE 

SCGPE3,CM5SOOO,T7000,MTi. 00 i 

COMMENT. THIS JOB CREATES A DEADSTART TAPE FROM THE RUNNING SYSTEM. 002 

REQUEST, NEWSYS,HY. MOUNT SCRATCH TAPE FOR NEW DEAOSTART 003 

REMNC,NEWSYS. qq^ 

EDITLIE(SYSTEM) 00 5 

UNLOAO(NEWSYS) 006 

COMMENT. *»» END OF JOB **» 008 
7/8/9 ENO CF RECORD 

REAOY(NEWSYS) 009 

RE MNC (SYSTEM) 010 

TRANSFER (*, SYSTEM) Oil 

SKIPF(2, SYSTEM) 012 

INCLUCEF (SYSTEM) 013 

INCLUDE (NUCLEUS, SYSTEM, CM) 014 

INCLUDE(SYSCVL, SYSTEM, OS) 015 

INCLUCE(FCRTRAN, SYSTEM, DS) 016 

INCLUDE(COEGL, SYSTEM, DS) 017 

INCLUGE(RUN2F3, SYSTEM, OS) 018 

INCLUDE(SYSIO,SYSTEM,DS) 019 

INCLLGE(SYSMISC, SYSTEM, DS) 020 

INCLUDE(IGS274, SYSTEM, DS) 021 

COMPLETE. 022 

ENCRUN. 023 
7/8/9 END CF RECORD 
6/7/8/9 END OF FILE 

SCOPES, CM55G00,T7QG0,MT01. 001 

LAEEL(FL1,R,L-SC0PE3P4,D=HY) LATEST SCOPE PL 002 

REWIND (FL1) 003 

UPCATE(Q,P=FL1) 004 

COMPASS(I=CCMFILE,S=0,L=0) 005 

REWINC(LGO) 006 

EDITLIE(SYSTEH) 007 



UNLOAG(FLl) 



006 



COMMENT. ♦** END OF JOB ♦** g 
7/8/9 END CF RECORD 

*IC SYSTEXT 011 

♦DELETE CPCTEXT.2 012 

IOENT SYSTEXT 013 

♦DELETE CFCTEXT.8 014 

*»♦ SYSTEXT - SYSTEM TEXT FOR 6000 SCOPE 3 WITH ♦CPC» . 015 

♦OELETE CPCTEXT.29 01 6 

END SYSTEXT 017 

»C CFCTEXT 016 
7/8/9 END CF RECORD 

READY(SYSTEH,OLD) 020 

LIERARY(NUCLEUS,OLD) 021 
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REFLACE(*,LGC) 322 

FINISH. 023 

COMPLETE. 024 

ENGRUN. 025 
7/8/c END CF RECORD 
6/7/8/9 END CF FILE 



VERIFICATION PBOGRAM 

The dayfile output for the SCOPE, COMPASS, and 6PM programs follows 

SCCFE 3.4 
05 .43.3G.VSC0F3W 
QS.43.30.\/SCOFE,CM600 0G,TlG0 0. 
05.43.30. THIS JOB CHECKS THE INSTALLATION OF 

05.43.30. SCOPE 3.4, 6RM, AND COMPASS 
05 .43.30. CCMPASS(L=C f S=SCPTEXT) 

05.43.31. ASSEMBLY COMPLETE. 464QQ8 SCM USED. 
05.43.31, 0.121 CPU SECONDS ASSEHBLY TIME. 
05.43.31.LGC. 

05.43.33. 1.232 RT SECONDS LOAD TIME 

05.43.33. CPCTEXT AND COMPASS ARE IN THE SYSTEM 

05.43.33. JOE PASSED 
05.43.33.REWINC(LGO) 

05 .43 • 33 .COMPASS CL s - S=IOTEXT) 

05.43.34. ASSEKELY COMPLETE. 466G0B SCM USED. 
05. 43. 34. 0.132 CPU SECONDS ASSEMBLY TIME. 
05.43.34.LGO. 

05.43.36. 1.315 RT SECONDS LOAD TIME 

05.43.36. 6RM IS IN THE SYSTEM 
05.43.36. JOB PASSEO 

05.43.36.CFA .505 SEC. 

05. 43. 36. PF 5.354 SEC. 



60307400 A 1-1-63 



COMPASS VERSION 3.0 



RELEASE DESCRIPTION 

20MPA.SS 3.0 is an improved comprehensive assembler program for the 6000 Series 
systems which provides many new capabilities. COMPASS 3.0 runs under SCOPE 
3.4 and requires the same minimum hardware configuration as SCOPE. 

RELEASE MATERIALS 

The program library for COMPASS 3.0 is known as PL2. 

MODIFICATIONS 

1 . New Built-in Operation Code Synonyms 



New 


Format 


Equivalent To 


LXi 


Bj 


LXi 


Bj,Xi 


AXi 


Bj 


AXi 


Bj,Xi 


NXi 




NXi 


B0,Xi 


NXi 


Bj 


NXi 


Bj,Xi 


ZXi 




zxi 


BO-Xi 


ZXi 


T5-i 

-~ J 


ZXi 


Bj,Xi 


UXi 




UXi 


B0,Xi 


UXi 


Bj 


UXi 


Bj,Xi 


PXi 




PXi 


B0,Xi 


PXi 


Bj 


PXi 


Bj,Xi 



New Built-in Micros 



BASE 


PCOMMENT 


CODE 


QUAL 


JDATE 


SEQUENCE 


MODLEVEL 





New Pseudo Instructions 



IFPL 


MACHINE 


IFMI 


IFCP6 


ENTRYC 


IFCP7 


ORGC 


IFPP6 


REPC 


IFPP7 



4. Extensions to Old Pseudo Instructions 

CODE PPOP 

COMMENT QUAL 

CPOP USELCM 
LIST 
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5. New Machine Instructions 

MAN Exchange jump to (MA) 

IM Indirect Move 

MD Indirect Move Descriptor Word (pseudo) 

DM Direct Move 

CC Compare Collated 

CU Compare Uncollated 

6. Multiple System Text Capability 

Dp to seven system text overlays may be usad tor a COMPASS 3.0 assembler 
run. They are specified by G and S parameters on the COMPASS control 
card. 

7. New Parameters on COMPASS Control Card 

ML Initial Value of MODLEVEL Micro 
PC Initial Value of PCOMMENT Micro 

8. Object Program Binary Format Extensions 

The binary card format generated by COMPASS has been extended in Version 
3.0. Details are discussed in the Loader Reference Manual, Publication 
No. 60344200. 

CORRECTIONS 

All eligible COMPASS 2.0 Programming System Report corrective code through 
Summary 312 is incorporated in the release tape. 

GENERAL DESCRIPTION 

COMPASS Version 3.0 consists of two overlays. The level (0,0) overlay COMPASS 
is the main control program. The level (1,0) overlay C0>IP2$ contains the 
assembler which can be called by compilers to process embedded COMPASS source 
programs. 

INSTALLATION PARAMETERS 

The installation parameter definitions are in alphabetic order on pages 5-8 of 
the COMPASS 3.0 assembly listing. Parameters that an installation may change 
are described below. 

INTMUL - integer multiply instruction usage. In the released system, an 
integer multiply OPDEF is used. If the integer multiply hardware feature is 
installed: 

*D CMP30. 114 
INTMUL EQU 1 
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LIBRARY - library name for overlay. In the released system, the (1,0) overlay 
COMP2$ must be in a library in the job's global library set, or in the NUCLEUS 
library. To make COMPASS load its overlay from a specific library: 

*D CMP30.120 
LIBRARY MICRO 1,,*libname* 

Changing this parameter from its default state will necessitate change in the 
installation deck EDITLIB records. 

MODEL - CDC CYBER 70 Series model on which COMPASS runs. Model 74 is assumed 
in the released system. To change: 

*D CMP30. 152 
MODEL MICRO 1,,*xx* 

where xx may be 72 or 73. 

TIMEMSG - assembly time dayfile message option. In the released system, 
COMPASS issues a dayfile message giving the total CPU time at the end of a 
batch of assemblies. To suppress this message: 

*D CMP30. 240 
TIMEMSG EQU 

INSTALLATION PROCEDURES 

The COMPASS 3.0 release tape contains four files: 

File 1 program library 

File 2 assembled binary 

File 3 installation deck CMP1A 

File 4 installation deck CMP2A 

CMP1A is a maintenance deck which can be used to create a revised program 
library and binary file. CMP2A can be used to enter COMPASS 3.0 into the 

deck CMP2A has completed, job SCOPE3 (discussed in Section 1) should be run to 
create a deadstart tape of the running system. 

To obtain the decks included as files 3-4, perform the following job: 

Job card. 

REQUEST (PL2,E) 

REWIND (PL2) 

SKIPF(PL2,2,17) 

COPYBF(PL2,PUNCH,2) 

RETURN (PL2) 

6/7/8/9 

The installation decks are shown below. 
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CMP1A,CM*4000,T7000,MT02. 001 

COMMENT. THIS JCB UPDATES AND CREATES THE BINARY OF COMPASS 002 

COMMENT. THE FIRST FILE OF THE NEW PL2 WILL BE THE NEWPL 003 

COMMENT. THE SECOND FILE WILL BE THE BINARY OF COMPASS 004 

LAEEL(FL2IN,R,L=COMPASS3P0*3P4,D=HI> COMPASS OLDPL 005 

REQUEST, FL2,N, HI. SCRATCH FOR NEW PL2 006 

LAEEL<FL2,W,L=CCMPASS3P0»3P4,D=HI) 007 

REWINC(PL2IN,PL2) 008 

UPGATE(F,P=FL2IN,N=PL2,E,X) 009 

UNLOAC(FL2IN) 010 

COMFASS(I=CCMFILE,S=0,B=COMTEXT,L=0) Oil 

COMPASS(I=CCMFILE,G=COMTEXT,L=0> 012 

REWIND(LGO) 013 

SKIPF(FL2,i,17> 014 

COFYEF(LGC,FL2) 015 

UNLOAC(PL2) 016 
7/8/9 END CF RECORD 

*/ ADC CCRRECTICNS HERE 018 
7/8/9 END CF RECORD 
6/7/8/9 END OF FILE 

CMF2A,CM540aQ,T70Q0,MTQi. 001 

COMMENT. THIS JCB EDITLIBS THE CCMPASS 3.0 BINARIES FROM THE PL2 TAPE 002 

COMMENT. INTO THE RUNNING SYSTEM. EITHER THE RELEASED VERSION OR THE 003 

COMMENT. VERSION CREATED BY DECK CMP1A MAY BE USED. 004 

LAEEL(FL2,R,L=CCMPASS3PG*3P4,D=HI> MOUNT COMPASS V3. OLDPL 005 

REWINC,PL2. 006 

SKIFF(FL2,1,17) SKIP OLDPL 007 

C0FYEF(PL2,C0MF> COMPASS BINARIES 008 

REWIND, FL2,CCMF. 009 

UNL0AC(FL2) 010 

EDITLIE(SYSTEM) Oil 

COMMENT. *** END OF JOB **» 012 
7/8/9 END CF RECORD 

REAOY(SYSTEM) 014 

LIERARY(NUCLEUS,OLD> 015 

RE FLACE (COMPASS, COMP, AL=3,FL=5 Q0,FLO=i) 016 

REFLACE($CCMP2SS$,COMP,AL=0> 017 

FINISH. 018 

COMPLETE. 019 

ENCRUN. 020 
7/8/9 END CF RECORD 
6/7/8/9 ENC CF FILE 
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RECORD MANAGER VERSION 1.0 



RELEASE DESCRIPTION 

To differentiate between 6000 and 7000 Series Record Manager, the term 6RM is 
used in the following description. 

6RM 1.0 operates under SCOPE 3.4, on the same minimum configuration as SCOPE. 

\ program library for 6RM is contained on the release program library tape 
PL3^ 6RM occurs first on a tape shared with SCOPE Indexed Sequential (IS), 
SCOPE Direct Access (DA) , and the 8-Bit Subroutines. 

The structure of the release format PL3 tape is as follows: 

Files 1-5 6RM 1.0 

1 6RM program library in UPDATE format 

2 SYSTEXT, IOTEXT, TXT6RM binary 

3 I/O modules binary 

4 FILE control card processor absolute binary 

5 FILE control card processor relocatable binary 

Files 6-7 IS 2.0 

6 IS 2.0 program library 

7 IS 2.0 binary 

*iles 8-9 DA 1.0 

8 DA 1.0 program library 

9 DA 1.0 binary 

Files 10-13 8-Bit Routines 

10 9-Bit Routines program library 

11 8-Bit Routines binary 

12 COPY8P relocatable binary 

13 COPY8P absolute binary 

Files 14-26 Installation decks for 6RM, IS,DA, 8-Bit Routines 

14-15 6RM installation decks 

16-19 IS 2.0 installation and verification decks 

20-22 DA 1.0 installation and verification decks 

23-26 8- Bit Routine installation and verification decks 

The procedures defined herein are intended for the installation of 6RM I/O 
routines in relocatable binary format; methods for assembling 6RM Sequential 
and Word Addressable I/O routines into absolute programs are described in an 
appendix of the Record Manager Reference Manual. 
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DEFICIENCIES 

EO = TD/DD/AD, does not work. 

Checksumming of I type blocks is not available. 

To extend most 6RM files, which are also permanent files, MODIFY permission is 
required. / 

Calls to the 7000 Record Manager are not available. 

If c blocked, non-W record, SCOPE tapes are copied to S tapes, section 
boundaries may be lost. 

ADDITIONAL INFORMATION 

6RM I/O modules are divided into two parts: 

Basic Access Modules 

These routines control selective loading based on file organization. They 
contain jump vectors directing a user call to the I/O code appropriate to the 
file organization selected. Their program names have an RM suffix. 
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Sequential and Word Addressable I/O Modules 

Texts: The I/O macro text included with the 6RM program library is IOTEXT, 
which is identical to the default SYSTEXT. It consists of, but is not limited 
to the macros included in the following table. (Some auxiliary macros exist 
which are not supported at the user level.) 



MACRO NAME 


SYSTEM 


FILE 


6RM 


FETCH 






STORE 






OPENM 






CLOSEM 






GET 






GETP 




1 


GETN 


IS/DA 


PUT 


6RM 


PUTP 






REPLACE 






DELETE 






ENDFILE 






SKIPdu 




i 


d=F/B,u=L/P/F 




SEEK 


IS/DA 


REWTNDM 


6RM 


WOER 






WTMK 






GETL 






PUTL 






CLOSEL 






CHECK 


; 


1 


ABORT 


SCOPE 


CHECKPT 






CLOCK 






CONTRLC 






DATE 






DISPOSE 






ENDRUN 






JDATE 






FILESTAT 






LOADREQ 






MEMORY 






MESSAGE 






RECALL 






RECOVR 






REQUEST 






RTIME 






SYSTEM 






TIME 






TRANSR 


1 





REFERENCE 



RM Ref. Man. 



COMDECK 



6RMCOM 



SCOPE 3.4 Ref. Man.* 



ACTCOM 



* These macros are source compatible with the corresponding macros on 
CPCTEXT (SCOPE 3.3 SYSTEXT), but they do not generate the same code. 
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INSTALLATION PARAMETERS 



The installation parameters, described below, permit a certain amount of 
tailoring. To facilitate writing the UPDATE cards, each installation 
parameter has a unique, mnemonic UPDATE identifier. To change the parameter 
from its default value to a user value, the following process is required: 

♦DELETE <mnemonic> .1 

=<parameter>= EQU <user-value> 

Updates which set installation parameters always should be done under UPDATE 
IDENTS of the following format: 



* I DENT 
mm 
dd 



URM<mmddyy> 

month 

day 



yy 



year 



Parameter 



DBG 



MCTL 



LBLIM 



Mnemonic 
Update ID 

DBG 



MCTL 



LBLIM 



Description 

Causes extensive debug code 
to be assembled if defined. 

Memory catalog table length. 
MCTL/ 2 is the maximum number 
of files allowed open at one 
time. 

Length of label buffer. 
Size limit of a user label 
string. Each user label 
requires 9 words. LBLIM 
should be n*9*1, where n is 
the maximum number of labels 
permitted (HDR1-9, . . .) . 



Default Value 
Off 

100 decimal 
10 decimal 



INSTALLATION PROCEDURES 

File 1 of PL3 contains the 6RM program library. 

Piles 2-5 are pre-assembled 6RM binaries assembled with default installation 
parameters. Files 14 and 15 contain decks necessary to install 6RM. They may 
be obtained as follows: 



Job card 
REQUEST ( PL 3, E) 
SKIPF(PL3,13,17) 

COPYBF(PL3,PUNCH, 2) 
UNLOAD (PL3 ) 
6/7/8/9 



MOUNT TAPE PL3 

SKIP 6RM, IS, DA, and 8 -Bit Subroutine 

program libraries 

TWO INSTALL DECKS 
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The installation decks are listed below. 



Deck SIXRM1 is a maintenance deck which allows regeneration of the 6RM portion 
of PL3. This deck updates the program library, assembles 6RM, and places the 
binary on the new PL as supplemental files. User selected installation 
parameters should be modified at the indicated place in SIXRM1. Deck SIXRM1 
requires access to the SCOPE program library to acquire the common deck ACTCOM 
used by the 6RM system texts. 



Deck SIXRM2 adds 6RM to the running system, either from the released PL3 or a 
PL3 created by deck SIXRM1. Then deck SCOPES, described in the SCOPE section 
of this document, can be run to create a dead start tape of the running system. 



SIXRM1»CM6 0QQO,T7000,MT02. 
COMMENT, THIS JOB UPOATES AND 
COMMENT. ANO COPIES THE OLDPL 
COMMENT. TO THE NEWPL3. THE NE 
COMMENT. THE FIRST FILE WILL B 
COMMENT. THE SECOND FILE WILL 
COMMENT. THE THIRD FILE WILL B 
COMMENT. THE FCURTH FILE WILL 
COMMENT. THE FIFTH FILE WILL B 
COMMENT. THE LAST e FILES WILL 
LAEEL(PLi,R,L=SC0PE3P4,0=HY> 

REWIND <FLi> 

UPDATE <Q,F=PL1,N=RANPL,C=0> 

UNLOAD(PLi) 

LAEEL<PL3IN,R,L=RM*3P4,D=HI> 

REQUEST, PL3,N,HI. SCRATCH 

LAEEL<FL3,W,L=RM*3P4,D=HI> 

REWIN0CPL3IN,PL3) 

UPCATE<F,P=PL3IN,N=PL3,X) 

COMPASS(I=CCMFILE,S=0,B=TEXTS, 

C0MPASS<I=CCHFILE,G=TEXTS/TXT6 

C0MPASS(1=CCMPILE,G=TEXTS/TXT6 

LIERARY(SYSIO) 

LOAO(FILEC) 6ENERATI0N 

NOGO. 

RE WIN0,PL3,IOM00S, FILE, TEXTS. 

RENIND(FILEC) 

SKIPFCFL3,i»17) 

COPYBF (TEXTS, PL3I 

C0FYBF<ICMCCS,FL3> 

C0FYEF(FILE,PL3) 

C0FYBFCFILECFL3) 

SKIPF<PL3IN,5,17) 

COPYBF <PL3Ih,FL3, 8) 

UNLOAD <PL3IN,FL3J 

7/8/9 END CF RECORO 

*C CPCTEXT 

7/8/9 ENO CF RECORD 

V ADO CORRECTIONS HERE 

7/8/9 ENO OF RECORO 

6/7/8/9 END OF FILE 



CREATES THE BINARY 
AND BINARY OF IS 
W PL3 WILL CONSIST 
E THE 6RM NEWPL 
BE THE BINARIES CF 
E THE BINARY OF TH 
BE THE BINARY OF T 
E THE RELOCATABLE 
BE THE PLS AND EI 
LATEST SCOPE 



6RM CLOPL 
FOR NEW PL3 



L=0,X*RANPL> SYST 
RM,S*PFMTEXT,B=IOM 
RM,fisFILEC,L*0) R 

OF OVERLAY FILE 



OF 6RM 
A ANO 6IT8 
OF THIRTEEN FILES 

THE TEXTS 
E OBJECT TIME ROUTINES 
HE OVERLAY FILE 
BINARY OF FILE 
NARIES OF IS DA AND B1T8 
PL 



EXT, IOTEXT, TXT6RM 
00S,L=0> I/O MODS 
ELOCATABLE BINARY OF FILE 



COPY IS OA AND BIT8 TO TAPE 



001 
002 
003 
004 
005 
006 
007 
006 
009 
010 
011 
012 
013 
014 
015 
016 
017 
018 

\j ^ " 

020 
021 
022 
023 
024 
025 
026 
027 
028 
029 
030 
031 
032 
033 
034 
035 

037 

039 
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SIXRM2,CM55G0G,T70 00,MT1. 

COMMENT. THIS JCB EDITLIBS ALL OF 

COMMENT. SYSTEM FROM THE RELEASED 

COMMENT. BY THE JOB SIXRMi. 

LAEEL<FL3,R,L=RM*3P<f,0=HI) 

SKIPF(FL3,i,17) 

COFYEF(FL3, TEXTS) 

C0FYBF(PL3,ICKCDS) 

COFYBF(PL3,FILE) 

UNL0AC(PL3) 

EOITLIE(SYSTEM) 

COMMENT. »** END OF JOB *** 

7/8/9 END CF RECORD 

REAOY(SYSTEM) 

LIERARY<NUCLEUS,OLD> 

REFLACE<», TEXTS, AL=0> 

REFLACE(*,FILE,AL=3,FL=2Q0C,FLO=0> 

FINISH. 

LIERARY(SYSICCLO) 

REFLACE(*,ICMCCS1 

FINISH. 

COMPLETE. 

ENCRUN. 

7/8/9 END CF RECORD 

6/7/8/9 END OF FILE 



THE 6RM 
VERSION 



BINARIES INTO 
OF PL3 OR THE 



THE RUNNING 
VERSION CREATED 



MOUNT PL3. 

SKIP OLDPL 

SYSTEXT, I0TEXT,TXT6RM 

I/O MODULES 

FILE GENERATION 



001 
002 
003 
QG<+ 
OQb 
006 
007 
008 
009 
010 
Oil 
012 

01<t 
015 
016 
017 
018 
019 
020 
021 
022 
023 
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SCOPE INDEXED SEQUENTIAL 2.0 4 



RELEASE DESCRIPTION 

Operating as a functional module of 6RM, SCOPE Indexed Sequential 2.0 (IS) 
provides for the creation and maintenance of a random storage file with 
records that can be retrieved by key as well as sequentially. An indexed 
sequential file created by IS(6RM) can be processed only by IS(6RM). 

Two utility routines called by control cards are available for indexed 
sequential files. SISTAT prints the statistics for an existing IS file, and 
the ESTMATE produces estimates of block and buffer sizes from input cards 
containing IS file descriptions. 

Interface routines provided allow the execution of SIS V1.0 programs that 
exist in either source language or binary format. 

RELEASE MATERIALS 

The SCOPE Indexed Sequential module is contained on program library PL3. This 
tape also contains 6RM, DA, and the 8-Bit Subroutines. 

\ complete catalog of PL3 contents may be found in section 1-3. 

MODIFICATIONS AND DEFICIENCIES 
Known Deficiencies and Limitations: 

1. If IS is used in a program with overlays, it should be included in the 
main overlay. The IS routines must not be overlaid. 

2. IS will not be reliable if permanent file installation parameter IP.MREWR 
is in effect, as this option permits access to a file from a control point 
while another control point is modifying that file. 
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INSTALLATION PARAMETERS 

This system contains parameter values which are effective when the user does 
not supply settings. These values may he altered during installation as 
explained in the next section. 

The default parameters are defined on the program library tape PL3 in the 
common deck SISCOMM. Their definitions, default values, ranges of acceptable 
decimal values, and UPDATE sequence locations are as follows: 



DAHDRSZW EQU 1 

DFEKGFAC EQU 2 

DFDAPADP EQU 

DFERRLIM EQU 26 



Data block 
(SISCOMM. 12) 



header 



size in words, range 1-31, 



Default data record blocking factor, range 1-4095 
(SISCOMM. 16) 



Default data 
(SISCOMM. 17) 



block padding factor, range 0-99 



Maximum number of trivial errors + 1. For SIS 1.0 
Programs only, range 1-32767 (SISCOMM. 18) . 



DFIBKSZW EQU 511 Default index block size in words, range 1-23767 

(SISCOMM. 19) 



DFINPADP EQU 5 
DFNRLVLS EQU 1 



Default index padding factor, range 0-99 (SISCOMM. 20) 

of index levels, range 1-63 



Default number 
(SISCOMM. 21) 



KEYLIMIT EQU 255 Maximum key 

(SISCOMM. 31) 



size 



in 



characters, range 1-511 



TOTFILES EQU 10 



Maximum number of active IS files per run. Defines an 
internal table size in words - no practical limit. 
(SISCOMM. 338) 



INSTALLATION PROCEDURES 

PL3 contains 18 files: files 6, 7, 16, 17, 18, and 19 pertain to IS 2.0. File 
6 contains the IS program library which will generate four COMPILE file 
records: 

COMPASS code for all IS functions 

COMPASS code for IS utilities 

FORTRAN Extended code for the IS utilities 

COMPASS code for the interface routines to SIS 1.0 
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File 7 contains the binary produced by assembling the contents of file 6. 
Files 16 and 17 are installation decks IS1 and IS 2 as listed below. Files 18 
and 19 contain the verification programs. Tnese decks can be obtained by 
executing the following job: 



Job card. 
REQUEST (PL3,E) 
REWIND (PL3) 
SKIPF(PL3,15, 17) 
COP YBF (PL3 , PUNCH , 2 ) 
COPYEF(PL3,PUNCH,2) 
UNLOAD (PL3) 
6/7/8/9 



MOUNT PL3 

SKIP PL AND BINARY DECKS 
PUNCH INSTALLATION DECKS 
PUNCH VERIFICATION PROGRAM DECK 



IS1 is a maintenance deck which can be used to create a revised program 
library and binary file containing modifications. IS2 can be used to enter IS 
into the running system from either the released tape or a tape created by 
IS1. Job SCOPE3 described in Section 1 should be run to capture a deadstart 
tape containing IS. If the SIS 1.0 interface code is not desired, remove the 
last COMPASS card in deck IS1. 

To obtain a running version of IS, DA must be in the system. The DA 
peripheral processor routine MSD is used by IS to process error messages. The 
DA routine TRC is needed to process trace messages. 
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ISi,Cfe350G,T700Q,MT02. 001 

COMMENT. THIS JCB UPOATES AND CREATES THE BINARY OF IS 002 

COMMENT. ANO COPIES 6FM DA AND BIT8 TO THE NEW PL3A. 003 

COMMENT. THE NEW PL3A WILL CONSIST OF THIRTEEN FILES. 0Q4 

COMMENT. THE FIRST FIVE FILES WILL BE 6RM 005 

COMMENT. FILE SIX WILL BE THE IS NEWPL 006 

COMMENT. FILE SEVEN WILL BE THE IS BINARY 007 

COMMENT. THE LAST SIX FILES WILL EE THE PLS AND EINARIES OF DA AND BIT8 008 

LAEEL(FL3AIN,R,L=RM*3P4,D=HI) IS CLDPL 009 

REQUEST, PL3A,N, HI. SCRATCH FOR NEW PL3A 010 

LAEEL(FL3A,K,L=RM*3P*,0=HI> OH 

REWIND(PL3AIN,FL3A) 012 

COFYEF(FL3AIN,FL3A,51 COPY 6RM TO TAPE 013 

UPDATE(F,P=PL3AIN,N=PL3A,R> 014 

REfcINC, COMPILE. 015 

COMPASS<I=CCMFILE,B=NEWBIN,S=TXT6RM,L=0,S=IPTEXT> 016 

C0NPASSU=CCMPILE,B=NEWBIN,S=TXT6RM,L = Q) 017 

FTN(I=COMFILE,e=NEWBIN,L=0,SYSEDIT) 018 

COMPASS(I=CGMPILE,B=NEWBIN,S=TXT6RM,S=IOTEXT,L=0) 019 

REWINC(NEWEIN) 020 

SKIPF(FL3A,1,17) 021 

C0FYEF(NEWBIN,PL3A,13 022 

SKIPF(FL3AIN,2,17) 023 

C0FYEF(FL3AIN,FL3A,6) COPY DA AND BIT8 TO TAPE 024 

UNL0A0(PL3A,FL3AIN) 025 
7/8/9 ENO CF RECORD 

*/ ADD CORRECTIONS HERE 026 
7/8/9 END CF RECORD 
6/7/8/9 END OF FILE 

IS2,CM55GQ0,T7Q00,MT1. 001 

COMMENT. THIS JCB EDITLIBS THE SIS BINARIES FRCM THE PL3 TAFEf EITHER 002 

COMMENT. THE RELEASEO VERSION OR THE VERSION CREATED BY OECK IS1, INTO 003 

COMMENT. THE RUNNING SYSTEM. 004 

LAEEL(FL3A,F,L = RM*3P<t,D=HI> MOUNT PL3 CONTAINING SIS 005 

REWIND, PL3A. 006 

SKIPF(FL3A,6,17> 007 

COFYER(PL3A,SIS,35) ACOMMON-INSERT 008 

C0FYER(PL3A,RUN,1) RUNCALL 009 

C0FYEF(FL3A,SIS) FTNCAL L-TERMNAT 010 

REWINO(SIS,RUN) 011 

UNLCAD(FL3A) 012 

EDITLIE(SYSTEM) 013 

COMMENT. *** END OF JOB *** 014 
7/8/9 END CF RECORD 

REAOY(SVSTEM 016 

LIERARY(NUCLEUS,OLD) 017 

REFLACE(ESTMATE,SIS,AL=3,FL=37 0G,FLO=i> 018 

REFLACE(SISTAT,SIS,AL=3,FL=210 0,FLO=1) 019 

REWINC(SIS) 020 

FINISH. 02i 

LIERARY(SYSIO,CLO) 022 

REFLACE(*,SIS) 023 

DELETE(SISTAT) 024 

OELETE(ESTMATE) 025 

FINISH. 026 

LIERARY(RUN2F3,CLO) 027 

REFLACE(*,RUN) 028 

FINISH. 029 

COMFLETE. 030 

ENCRUN. 031 
7/6/9 ENO OF RECORO 
6/7/8/9 END CF FILE 
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VERIFICATION PROGRAMS 

FORTRAN Extended and COBOL 4.0 must be installed before the corresponding 
installation verification program on files 14 and 15 can be run. Comment 
cards describe the purpose of each deck. 

Dayfile output obtained by running the decks included on files 14 and 15 of 
the release tape is as follows: 

SCOPE 3.4 07/14/72 

21.14. 29. VSIS100 

21.14.29.VSISl,CM6000 0,T7 00 t P37. 

21.14.29. ******** SIS VI ♦♦♦♦»♦****** 
21.14.29.C0MPASS<S=CPCTEXT) 

21.14.32. ASSEMBLY COMFLETE. 43500B SCM UStO. 
21.14.32. 2.376 CPU SECONDS ASSEMBLY TIME. 
21. 14. 32. LIBRARY 1SYSI0) 
2i.14.32.LG0. 
21.14.35. 2.898 RT SECONDS LOAD TIME 

21.14.38. ***** TEST PASSED ******* 
21.14.38.REWIN0(SISMESS) 

21.14.39. .488 RT SEC0N0S LOAD TIME 
21.14.39.REWIND(0UTPUT) 

21.14.39. .493 RT SECONDS LOAO TIME 
21.14.39.RETURN(SISFILE) 

21.14.40. .498 RT SECONDS LOAD TIME 
21.14. 40. REWINDtLGO) 

21.14.41. .505 RT SECONDS LOAD TIME 
21.14.4i.FTN. 

21.14.42. .612 RT SECONDS LOAD TIME 

21.14.43. .264 CP SECONDS COMPILATION TIME 
21.14.43.LG0. 

21.14.51. 7.101 RT SECONOS LOAD TIME 

21.14.54. END TEST 

o< a i. c<. **** tf<;t p a ?s S F n ***** 

ClIXll^ll !■_«•■ n — — — - 

21.14.54.REWINDISISMESS) 

21.14.55. .769 RT SECONDS LOAD TIME 
21.14.55.REWIN0(OLTPUT) 

21.14.56. .827 RT SECONDS LOAD TIME 
21. 14. 56. REWINDtLGO) 

21.14.57. 1.293 RT SECONDS LOAD TIME 
21.14.58.RETURN(SISFI IE) 

21.14.59. 1.310 RT SECONDS LOAD TIME 

21.15.00.COBOL(LM,Z) 

21.15.02. 2.087 RT SECONDS LOAD TIME 

^l«17»UH«WUnr;Linu oj.oic.ji 

21.15.15. 000 E AND T/U DIAGNOSTICS ISSUED 

21.15.16. FIELD LENGTH NEEDED FOR COBOL 052600 
21.15.16. .648 CP SECONDS COMPILATION TIME 
21. 15. 16. END COBOL 

21.15.i6.LG0. 

21.15.26. 9.894 RT SECONDS LOAD TIME 

21.15.33. **** TEST PASSED **** 

21.15.33.REWIN0ISISMESS) 

21.15.36. 1.965 RT SECONDS LOAO TIME 

21.15. 36. REWIND « OUTPUT) 

21.15.45. 1.432 RT SECONDS LOAD TIME 

21.15.49.C0PYBF(E0F,0UTPUT) 

21.16.41. 1.438 RT SECONDS LOAD TIME 

2i.16.42.E0F/E0I ENCOUNTERED 

2i.16.42.CPA 9.527 SEC. 

21. 16. 42. PP 30.417 SEC. 

21.16.42.10 3.865 SEC. 
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SCOPE 3.4 07/14/72 

21.14.45. VSIS2Q0 

2i.i4.45.VSIS2,CM6 000 0,T7 0,P37. 
21.14.45. *** SIS V 2 *** 

21.14.45. THIS IS Tf-E COMPASS VERIFICATION TES 

21. 14. 45. T DECK SIS V2 

21. 14. 45. LIBRARY (SYSIO) 
21.14.46.REWIN0«LG0) 

21.14.47. .803 RT SECONOS LOAO TIME 
21. 14. 47. COMPASS CS=IOTEXT) 

21.14.48. .864 RT SECONOS LOAO TIME 
21.14.54. 1 WARNING MESSAGE IN I2P01 
21.14.54. ASSEMBLY COMPLETE. 47600B SCM USED. 
21.14.54. 3.377 CPU SECONDS ASSEMBLY TIME. 
21.14.54.LG0. 

21.14.59. 4.373 RT SECONDS LOAD TIME 

21.15.03. ***** TEST PASSED ******* 
21.15.03.REWIND,2Z2ZZEF. 

21.15.03. .688 RT SECONDS LOAD TIME 
21.15. 03. REWIND t OLTPUT) 

21.15.04. .644 RT SECONOS LOAD TIME 
21.15.04.REWIND(LGO) 

21.15.05. .802 RT SECONDS LOAD TIME 
21.15. 05. RETURN (GENFILE) 

21.15.08. 2.03*< RT SECONDS LOAD TIME 

21.15. 08. FTN. 

21.15.12. 3.736 RT SECONOS LOAO TIME 

21.15.18. .593 CP SECONDS COMPILATION TIME 
21.15. 18. LIBRARYINUCLEUS,SYS0VL) 

21.15.19. .863 RT SECONDS LOAD TIME 
21.15. 19. LGO. 

21.15.43. 13.441 RT SECONOS LOAD TIME 

21.17.01. ENO INSTEST 

21.17.01. ***** TEST PASSED ******* 

21.17.0i.REWIN0,22222EF. 

2i.i7.01.REWIN0(OLTPUT) 

21.17.01.REWINO(LGO) 

21.17. 01. RETURN (SISFILE) 

21.17. 02. COBOL. 

21.17.04. 1.982 RT SECONOS LOAD TIME 

21. 17. 07. COMPILING BUILD 

21.17.15. 000 E ANO T/U DIAGNOSTICS ISSUED 

21.17.15. FIELD LENGTH NEEDED FOR COBOL 052600 

21.17.15. .478 CP SECONOS COMPILATION TIME 

21.17. 15. END COBOL 

21.17. 15. LGO. 

21.17.25. NON-FATAL LOADER ERRORS - SEE MAP 

21.17.27. 11.578 RT SECONDS LOAD TIME 

21.17.43. ******** TEST PASSED ****** 

21.17.43.*** 

21. 17. 43. REWIND, OUTPUT. 

21.17.43.REWIND,ZZ222EF. 

21.17. 44. COPYBFI EOF, OUTPUT) 

2i.17.45.E0F/E0I ENCOUNTERED 

21.i7.46.CPA 10.021 SEC. 

21.17. 46. PP 46.539 SEC. 

21.17.46.10 4.221 SEC. 
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SCOPE DIRECT ACCESS 1.0 



RELEASE DESCRIPTION 



Operating as a functional module of 6RM, SCOPE Direct Access (DA) provides all 
the routines requisite to creating, updating, and accessing random files on 
mass storage. It consists of a related set of central processor routines 
which are loaded, as required, in the user's field length. Additionally, DA 
contains one PP routine which is used for diagnostic processing. 

A key analysis utility routine is available to aid in the selection of a 
hashing routine. 

A create utility routine is available for use in creating DA files 
efficiently. 

\ direct access file created by DA(6RM) can be processed only by DA (6RM) 
operating under the SCOPE 3. a operating system. 

RELEASE MATERIALS 

DA. 1.0 is contained on program library tape PL3. PL3 also contains 6RM 1.0, 
IS 2.0, and the 8-Bit Subroutines. 

A complete catalog of PL3 contents may be found in section 1-3. 

MODIFICATIONS AND DEFICIENCIES 
Known Deficiencies and Limitations 

1. If DA is used in a program with overlays, it should be included in the 
main overlay. The DA routines must not be overlaid. 

2. DA tfill not be reliable if permanent file installation parameter IP.MREWR 
is in effect, as this option permits access to a file from one control 
point while another control point is modifying that file. 

3. The create utility requires that SORT MERGE be installed. If SORT/MERGE 
is not available, comparable DA files can be created through explicit 6RM 
calls, at the expense of appreciably greater creation time. 
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INSTALLATION PARAMETERS 

DA contains a single parameter value which is effective when the user does not 
supply his own setting. This value may be altered during installation of DA. 
The default parameter is defined on the program library tape in the common 
deck, SDACOM. Its definition, default value, range of acceptable decimal 
values, and UPDATE sequence location is: 

BLKHDL EQU 1 Block header length (CM words) , range 1-31 (SDACOM. 38) 

If the above parameter is out of range, the following message will be issued: 

INSTALLATION PARAM BLKHDL OUTSIDE 1-31 RANGE 

INSTALLATION PROCEDURES 

PL3 contains 26 files: files 8, 9, 20, 21, and 22 pertain to DA. File 8 
contains a program library that will generate four records on the COMPILE 
file: 

COMPASS code for all DA CP routines 

COMPASS code for the DA PP diagnostic routine 

COMPASS code for the FORTRAN interface 

COMPASS code for the key analysis and create utilities 

File 9 contains the binary produced by assembling the contents of file 8. 
Files 20 and 21 contain installation decks DA1 and DA2. File 22 contains the 
installation verification programs. These decks can be obtained by executing 
the following job: 



Job card. 
REQUEST (PL3 , E) 
REWIND (PL 3) 
SKIPF(PL3,19,17) 
COPYBF(PL3,PUNCH,2) 
COPYBF ( PL3 , PUNCH , 1 ) 
UNLOAD (PL 3) 
6/7/8/9 



MOUNT CA PROGRAM LIBRARY 

SKIP UPDATE AND BINARY DECKS 

PUNCH INSTALLATION DECKS 

PUNCH VERIFICATION PROGRAM DECKS 



Successful assembly of the routines processed by deck DA1 card 020 requires 
that SORT MERGE be previously installed (see limitation 3) . If SMTEXT is not 
present in the running system when deck DA1 is run, three assembly errors will 
appear in routine DCREATE, and deck DA2 will yield an EDITLIB diagnostic that 
cannot be satisfied in the interval. 
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DA1 is a maintenance deck which can be used to create a revised program 

library and binary file containing modifications. DA2 can be used to enter DA 

into the running system from either the released tape or a tape created by 

SDA1. Job SCOPE3, described in Section 1, should be run to capture a 
deadstart tape containing DA. 

NOTE: If the key analysis utility is to be used as an own code exit from 
FOFM (see Section 6), FORM must be present in the system. 

OAi,CM60GQO,T7000,MT02. 

COMMENT, THIS JCB UPDATES AND CREATES THE BINARY OF DA 

COMMENT. ANC COPIES 6RM AND IS TO THE NEW PL3B. OOi 

COMMENT. THE NEfc PL3B WILL CONSIST OF THIRTEEN FILES. 002 

COMMENT. THE FIRST SEVEN FILES WILL BE THE OLDFLS AND BINARIES Qtt3 

COMMENT. CF 6RM ANO IS 004 

COMMENT. FILE EIGHT WILL BE THE DA NEWPL 005 

COMMENT. FILE NINE WILL BE THE BINARY OF OA 006 

COMMENT. THE LAST FOUR FILES WILL EE THE PL ANC EINARY OF BIT8. 007 

LAEEL(FL3EIN,R,L=RM*3P<*,D=HI> DA CLDPL 006 

REQUEST, FL3E,N,HI. SCRATCH FOR NEW PL3E (TQ9 

LABEL <FL3E,H,L=RM*3P<»,0=HI> 010 

REWIND (FL3E IN, FL3B) Oil 

COFYEF(FL3EIN,FL3B,71 COPY 6RM AND IS TC TAPE 012 

UPDATE <F,P=FL3EIN,N=PL3B,R,X) 013 

REfcINC, COMPILE. 014 

COMPASS(I=CCMFILE,L=0,S=TXT6RM) 015 

COMPASS(I=CCMFILE,S=PPTEXT,L=0) 016 

COMPASS(I=CCMFILE,S=IOTEXT,L=0) 017 

COMPASSU=CCMPILE,S=IOTEXT,S=CPCTEXT,S=LORTEXT,S=SMTEXT,L=0> 018 

RENINO(LGC) 019 

SKIFF(FL3E,1,17) 020 

C0FYBF(LG0,FL3E) 021 

REWINC(FL3E1N) 022 

SKIPF(FL3EIN,9,17) 023 

C0FYBF(FL3EIN,FL3B,4) ..■ COPY BIT8 TO TAPE 02** 

UNL0AD(PL3EIN,FL3B) 025 

7/8/9 END OF RECORD 026 

»/ ACC CORRECTIONS HERE 027 
7/8/9 ENO CF RECORD 

6/7/8/9 END OF FILE 029 
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DA2,CH55 0QO,T70 0,MT1. 001 

COMMENT. THIS JCB EDI TL IBS THE SDA BINARIES FRCM THE PL3 TAPE, EITHER 002 

COMMENT. THE RELEASED VERSION OR THE VERSION CREATED BY THE DECK OAi, 003 

COMMENT. INTO THE RUNNING SYSTEM. 004 

LAEEL<FL3B,fi,L=RM*3P4,D=HI> MOUNT PL3 CONTAINING SDA 005 

REWIND, PL3E. °0 6 

SKIFF<FL3B,8,17> 007 

COFYEF(FL3E,SDA) SOA BINARIES 008 

RENINO(SCA) 009 

UNLOAC(FL3E> ° 10 

EDITLIB(SYSTEf) Oil 

COMMENT. *,** CNO OF JOB ♦** 012 
7/8/9 END CF RECORD 

REAOY(SYSTEM) 014 

REFLACE(MSO,SOA) 015 

REMNOCSDM ° 16 

LIERARY(NL ! CLEUS,OLD) 017 

REFLACE<KYAN*OCREATE f SDA,AL=3,FL=20QQ0,FLO=i) 018 

FINISH. 019 

LIERARYCSYS10,CLD1 020 

REKINO(SGA) 021 

REFLACE(*,SOA> 022 

OELETE(MSO) ° 23 

OELETE(KVAN) 024 

OELETE(DCREATE) 025 

FINISH. ° 26 

COMPLETE. ° 27 

EN DRUM* ° 28 
7/8/9 ENO CF RECORD 
6/7/8/9 ENC CF FILE 

VERIFICATION PROGRAMS 

FORTRAN Extended 4.0 and COBOL 4.0 must be installed before the corresponding 
installation verification program on file 18 can be run. Comment cards 
describe the purpose of the deck. 

Dayfile output of the verification programs is as follows: 

SCOPE 3.4 
21.14.58.VSDA00O 
21.14.58.VSDA,CM65000,T7000. 
21 .14.58 .LIBRARY! SYSIO) 
21.14.58.C0MPASSCS=I0TEXT> 
21.14.59. .804 RT SECONOS LOAD TIME 
21.15.07. 1 WARNING MESSAGE IN INSTALL 

21.15.07. ASSEMBLY COMPLETE. 47600B SCM USEO. 
21.15.07. 4.276 CPU SECONOS ASSEMBLY TIME. 
21.15.07. ••♦ INSTALLATION TEST *** 
21.15.07. LANGUAGE- COMPASS 
21.15.07. PROOUCT- SOA 
21.15.07.SHITCHI1) 
21.15. 07.LGO. 
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21.15. 15. 6.737 RT SECONOS LOAD TIME 

21.15.45. ♦♦♦♦♦♦♦♦♦♦♦JEST PASSED *************** 

2i.i5.45.REWIND,ZZZZZEF. 

21.15.47. 2.009 RT SECONOS LOAD TIME 

21. 15. 48. REWI NO I OUTPUT) 

21.16.05. 9.565 RT SECONOS LOAD TIME 

21.16. 05. REWINO(LGO) 

21.17.36. .477 RT SECONDS LOAD TIME 

2i.i7.36.FTN. 

21.17.55. 1.994 RT SECONDS LOAD TIME 

21.17.59. .419 CP SECONOS COMPILATION TIME 

21.17.59. *** INSTALLATION TEST *** 

21.17.59. LANGUAGE- FORTRAN 

21.17.59. PRODUCT- SDA 

2i.i7.59.LG0. 

21.18. 12. 12.583 RT SECONOS LOAO TIME 

21.18.47. ENO INSTALL 

2i.i8.47. *********** TEST PASSED *♦******♦♦♦♦♦+* 

2i.i8.47.REWIN0,ZZ2ZZEF. 

21.18.49. 1.783 RT SECONOS LOAD TIME 
21.18.49.R£WIN0(0LTPUT) 

21.18.51. 1.750 RT SECONOS LOAD TIME 

21.18.51. *** INSTALLATION TEST *** 
21.18.51. LANGUAGE- COBOL 
21.18.51. PRODUCT- SDA 
21.18.51.REWIND(LG0) 

21.18.53. 1.362 RT SECONOS LOAD TIME 
21. 18. 53. COBOL. 

21.18.57. 3.412 RT SECONOS LOAD TIME 

21. 19. 00. COMPILING PT EST2 

21.19.05. 000 E AND T/U DIAGNOSTICS ISSUED 

21.19.05. FIELD LENGTH NEEDED FOR COBOL 052500 

21.19.05. .512 CP SECONDS COMPILATION TIME 

21. 19. 05. ENO COBOL 

21.19. 05. LGO. 

21.19.15. NON-FATAL LOADER ERRORS - SEE MAP 

21.19.16. 10.671 RT SECONOS LOAD TIME 

21.19.50. ***»*»*»***TEST PASSED *************** 
21.19.5 0.REWIND,ZZZZZEF. 

21.19.51. .985 RT SECONOS LOAD TIME 
21.19.51.REWIN0(OL'TPUT) 

21.19.52. .997 RT SECONOS LOAD TIME 
21.19.53.C0PYBF«E0F,0LTPUT) 

21.19.54. 1.008 RT SECONDS LOAD TIME 
2i.19.55.E0F/E0I ENCOUNTERED 
2i.19.55.CPA 11.383 SEC. 

21. 19. 55. PP 62.271 SEC. 
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FORM VERSION 1.0 



GENERAL DESCRIPTION 

FORM is a general purpose utility routine operating on records supplied by a 
user; it is capable of performing the following functions: 

Conversion to and from System/360 format 

Record selection according to data content 

Record redefinition as to data type, content, and organization 

File reorganization 

Sequence numbering 

Print reformatting 

RELEASE MATERIALS 

FORM 1.0 is contained on program library PL4. 

HARDWARE CONFIGURATION 

FORM requires the same minimum hardware configuration as SCOPE. 

INSTALLATION PARAMETER 

FORM will reference IP.CSET at installation time and provide the necessary 
options as defined for the character set. 

INSTALLATION PROCEDURES 

The FORM release tape contains five files: file 1, program library; file 2 f 
compiled binary; files 3 and 4, installation decks; and file 5, the 
verification program. 

FORM1 (file 3) is a maintenance deck which can be used to create a revised 
program library and binary. FORM2 (file 4) may be used to add FORM to the 
running system from either the released tape or a tape prepared by FORM1 . To 
obtain these three decks, execute a job of the type: 

Job card. 

REQUEST (PL 4, E) 

REWIND (PL4) 

SKIPF(PL4,2,17) SKIP PL and BINARY 

COPYBF(PL4, PUNCH, 2) PUNCH INSTALLATION DECKS 

COPYBF(PL4, PUNCH, 1) PUNCH VERIFICATION DECK 

UNLOAD (PL 4) 

6/7/8/9 

Following execution of FORM2, Job SCOPE3, described in Section 1, may be run 
to create a deadstart tape containing FORM. 
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FORMi,CM700Q0,T700Q,MT02. 

COMMENT. THIS JCB UPDATES AND CREATES THE BINARY OF FORM, 

COMMENT. THE FIRST FILE OF THE NEH PL4 WILL BE THE NEWPL 

COMMENT. AND THE SECOND FILE WILL EE THE BINARY 

LAE£L<FL4IN,R,L=FORM1FO»3P4,D=HI) FORM OLDPL 

REQUEST, FL4,N, HI. SCRATCH FOR NEW PL4 

LAEEL(FL4,W,L=FCRM1P0*3P4,D=HI) 

R£WIN0(FL4IN,FL4> 

UPDATE(F,P = FL4IN,N=:PL4) 

UNL0ACCPL4IN) 

SYMPL<I=COMPILE,L=0) 

COMPASS(I=CCMFILE,S=IOTEXT,S=IPTEXT,L=0> 

REWINO(LGO) 

SKIPF(FL4,i,17) 

C0FYEF<LG0,FL4> 

UNL0AC(FL4> 

7/8/9 ENO CF RECORD 

»/ ADC CORRECTIONS HERE 

7/8/9 END CF RECORD 

6/7/8/9 END CF FILE 



001 
002 
003 
004 
005 
006 
007 
008 
009 
010 
011 
012 
013 
014 
015 
016 

018 



FORM2,CM55 0Q0,T7 00G,MTi. 

COMMENT. THIS JCB TAKES THE 

COMMENT. CREATED BY THE JOB 

COMMENT. INTO THE RUNNING SYSTEM. 

LAEEL(FL4,R,L=F0RM1PQ*3P4,D=HI> 

REWINC,FL4. 

SKIPF<FL4,1,17> SKIP 

COFYER(PL4,FMCC,l) FORM 

C0FYEF<FL4,FML) FORM 

R£WIN0,FMCC,FML,PL4. 

UNLOAC(FL4) 

EDITLIE(SYSTEM) 

COMMENT. »»« ENO OF JOB *** 

7/8/9 END CF RECORD 

READY (SYSTEM) 

LIERARY(NUCLEUS,OLDJ 

REFLACE(FORM,FMCC,AL=3,FL=53G0 0,FLO=l) 

FINISH. 

LIERARY(SYSIO,CLD) 

REFLACE<*,FML,AL=0) 

FINISH. 

COMPLETE. 

ENCRUN. 

7/8/9 END CF RECORD 

6/7/8/9 END CF FILE 



RELEASED VERSION OF FORM OR THE 
FORM! AND EDITLIBS THE BINARIES 



MOUNT PL4 TAPE 



VERSION 
FROM PL14 



CLOPL 

CONTROL 

LIBRARY 



CARD CALLABLE ROUTINE 



001 
002 
003 
004 
005 
006 
007 
008 
009 
010 
Oil 
012 
013 

015 
016 
017 
018 
019 
020 
02.1 
022 
023 
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VERIFICATION PROGRAM 

After installation deck FORM2 has completed, the FORM verification program 
should be run. Dayfile output from this job should match the following. 

SCCPE 3.<* 
05.^.2i.VFCRK3Y 
Q5.^.2i.VFCRM,CM6500 0,T50. 
05 .<♦*♦. 21. FCRM. 

05.^.28. 7.118 RT SECONDS LOAC TIME 

05.^.50. END OF JOB 

05.^.50.CPA 1.728 SEC. 

05.^.5G.PF 8.315 SEC. 
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CE DIAGNOSTICS 



RELEASE DESCRIPTION 

CE Diagnostics require the same hardware configuration as SCOPE 3.4. 

RELEASE MATERIALS 

CE Diagnostics are released on program library tape PL5. 

NEW FEATURES 

A new magnetic tape test (MTT) has been added to comply with the new tape 
subsystem testing standard. 

h new random instruction test (ALX) has been added also which is basically the 
same as ALS with the exception that it does not utilize a store atter store. 
Essentially ALX is a faster version of ALS. 

Two new routines (CEDIAG and OLE) enable all non-RMS diagnostics to be called 
into execution in the same manner. Central processor routine CEDIAG uses the 
central programmable L display to allow the operator to assign equipments to 

tniS Control pOmt for lutuie test-nty uy a. uxo^uuoi.j.w jji.wyj.aui. *-* i^>""'* 

CEDIAG uses PPU program DLE to pass equipment status taole information and 
assign operator requested i/o devices. As a result of new programs CEDIAG and 
DLE, no I/O diagnostics are callable by control card. 

The automatic sequencer program (APR) has been removed from the SCOPE program 
library and added to the CE Diagnostics PL. Externally, APR is the same as it 
appeared on PL1 • Internally, the code is optimized and tag names redefined to 
add lucidity to the listing. APR also is capable of processing a 17-bit 
sequencer table address. 

Because of new system philosophy, a new ordering of job control cards is 
required to run a sequence job. See 6000 SCOPE 3. 4 HARDWARE MAINTENANCE 
FEATURES REFERENCE MANUAL (Publication No. 60364800) for example. 

.CORRECTIONS 

All eligible PSR Code published through PSR Summary No. 312 has been added to 
the CE Diagnostic program Horary. 
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INSTALLING CE DIAGNOSTIC PROGRAMS 
Installation Parameters 

Release values of installation parameters in the deadstart diagnostic 
sequencer routine, CES, are shown below. To change these parameters, cards 
with the proper code and the CEQU macro should be placed after an *INSERT 
CES. 54 card and inserted into installation deck CEDIAG1. 

IP.DFL CEQU 20 OB 

Central memory field length, divided by 100B, used by the deadstart 
diagnostics. This parameter is used by the Y-option testing only. 

IP. DRA CEQU 400B 

Central memory RA/100B, used by the deadstart diagnostics. This parameter is 
used by the Y-option testing only. 

IP.MCPU CEQU 1 

Number of central processors present in the system; should be set to 1 for 
6400 and 6600, to 2 for 6500 and 6700. 

IP. NOISE CEQU 3 

Same as I P. NOISE in CIOCOM of the SCOPE program library. IP. NOISE must have 
identical settings on the SCOPE and CE Diagnostic program libraries. 

INSTALLATION PROCEDURES 

The structure of the CE Diagnostic program library is: file 1, program 
library; file 2, binary form of running system diagnostics; file 3, binary 
form of diagnostic deadstart records; file 4, relocatable binary of CEFAP and 
EC2; and files 5 and 6 installation decks. To obtain the decks, perform the 
job: 

Job card. 

REQUEST (PL 5, E) 

REWIND (PL5) 

SKIPF(PL5,4,17) SKIP PL AND BINARY 

COPY BF(PL5, PUNCH, 2) INSTALLATION DECKS 

UNLOAD (PL5 ) 

6/7/8/9 

Installation job CEDIAG1 updates and creates a new CE diagnostics program 
library including assembled/compiled binaries of both the deadstart and 
running system diagnostics as files 2, 3 and 4. Job CEDIAG2 creates a 
deadstart tape of the running system including deadstart and running system CE 
diagnostic routines. 

When a deadstart tape is configured for one system, location SITENUM in 
subroutine CEFAPC should be changed to the CE site number of that particular 
system. 
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Example: 

♦ID MYSITE 

♦D PTR8081.285 (Current sequence number of SITENUM) 

SITENUM DIS ,*C18J2.3* 

♦COMPILE CEFAP 

When a deadstart tape is configured for multiple systems and the CE site 

number is to change for each system, location SITENUM should be changed to 
DATA. 0; and CEFAP will request the site number through the L display. 

Example: 

♦ID MYSITE 

♦D PTR8081.285 (Current sequence number of SITENUM) 

SITENUM DATA 

♦COMPILE CEFAP 

Because of new system philosophy, a new ordering of job control cards is 

required to run a sequence job. See 6000 SCOPE 3.4 HARDWARE MAINTENANCE 
FEATURES REFERENCE MANUAL (Publication No. 603 64800) for example. 

CEGIAG1,CM62000,T7000,MT02. 001 

COMMENT. THIS JCB UPDATES AND CREATES THE BINARY OF C. E.DIAGNOSTICS. 002 

COMMENT. THE NEN PL5 WILL CONSIST OF FOUR FILES 003 

COMMENT. THE FIRST FILE WILL BE THE NEWPL 004 

COMMENT. THE SECOND FILE WILL BE THE ABSOLUTE AND RELOCATABLE BINARIES 005 

COMMENT. THE THIRD FILE WILL BE THE BINARY OF THE DEADSTART ROUTINES 006 

COMMENT. THE FOURTH FILE WILL BE THE RELOCATABLE BINARY OF CEFAP AND EC2 007 

LAEEL(FL5IN,R,L=CEDIAG*3P4,D=HI) CE 0IAG 0LDFL 008 

REQUEST, FL5»N, HI. SCRATCH FOR NEW PL5 009 

LAEEL(FL5,W,L=CE0IAG*3P4,D=HI) 010 

REWINC<PL5IN,FL5) 011 

UPDATE <F,P=FL5IM,N=PL5> 012 

UNLOA0(PL5IN> 013 

COMPASS(1=COMPILE,S=SCPTEXT,L=0,B=BIN1> 014 

COMPASS<I=CCMFILE,S*SCPTEXT,L=0,B=EINi> 015 

COMPASSU=CCMPILE»S=SCPTEXT,S=SCHTEXT,L=0) 016 

FTMI = COHPILEfSsCPCTEXT,S=PFMTEXT,e=BIN f L=0> 017 

REWINC(EIN) 018 

LOAO(EIN) GENERATION OF OVERLAYS CEFAP AN0 EC2 019 

NOGO. 020 

REWIND <CEFAF,EC2> 021 

REWIND (BIN) 022 

COFYEF(CEFAF,LGC) 023 

BKSP(LG0,i) 024 

C0FYEF(EC2,LG0) 025 

REWIND(BINl) 026 

COFYER<BIM,NIL,5> 027 

BKSP(LG0,1) 028 

C0FYBF(BIN1,LGC) 029 

REWINC(BIN1,LG0) 030 

SKIFF CFL 5 ,1,17) 031 

COFYEF(LG0,FL5) 032 

C0FYBF(BIN1,PL5) 033 

C0FYBF(BIN,FL5) 034 

UNL0AC(PL5) 035 
7/8/9 ENO CF RECORD 

V AC0 CORRECTIONS HERE 037 
7/8/9 ENO OF RECORD 
6/7/8/9 ENC OF FILE 
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CECIAG2,CMSi3 0GO,T7GGO,MT2. 

COMMENT. THIS JCB TAKES THE EINARIES FROM THE C. E. DIAGNOSTICS PL AND 
EOITLIES THEM INTO THE RUNNING SYSTEM. THE SECOND EDITLIB WILL 
CREATE A NEW DEADSTART TAPE WHICH WILL CONTAIN THE DEAOSTART 
DIAGNOSTICS ROUTINES. 



COMMENT. 
COMMENT. 
COMMENT. 
COMMENT. 
COMMENT. 
COMMENT. 



IF C. E. DIAGNOSTICS HAS NOT BEEN INSTALLEO IN THE SYSTEM, 
REPOVE THE CARD. .. SKI PF (12, SYSTEM) ... FROM THE SECONO EDITLIB. 



SKIP OLDPL 

PP AND CP ROUTINES 

DEADSTART ROUTINES 



LAEEL<FL5,R,L=CEDIAG*3P4,D=HI) MCUNT C. E. DIAGNOSTICS 

REQUEST, NEKSYS,HY. MOUNT SCRATCH TAPE FOR NEW 

REWIND, FL5,NEWSYS. 

SKIFF(FL5,i,17) 

COFYEF(FL5,CECIAG) 

COFYBF(PL5,DSR) 

REWIND, FL5,CE0IAG,DSR. 

EDITLIE(SYSTEM) 

EOITLIB(SYSTEM) 

UNLOAC(PL5,NENSYS) 

COMMENT. *»* END OF JOB *** 

7/8/9 END CF RECORD 

READY(SYSTEM) 

REFLACE(MTT+CR1,CEDIAG) 

REFLACE<AFR,CECIAG,AL=1) 

REFLACE(IEF«-DLE,CEDIAG) 

REWINC(CEOIAG) 

LIERARY(NUCLEUS,OLD) 

RE PLACE (CEDIAGfCERMS,CEDIAG,AL =7777, FL=2 00 0,FL 0=1) 

REFLACE(CEFAP,CEDIAG, AL=7777,FL=40QO0 f FLO=O) 

REFLACE(EC2,CECIAG,AL=7777,FL=45C0Q,FLO=Q) 

REFLACE(CM6+MY1,CEDIAG,AL=7777 ,FL=2000 ,FLO=0) 

REFLACE(ALS,CEDIAG,AL=7777,FL=15Q0,FLO=0) 

REFLACE(FST,CEDIAG,AL=7777,FL=12CO,FLO=0) 

REFLACE(CT3,CECIAG,AL=7777,FL=5CO0,FLO=0) 

REFLACE(CUi,CECIAG,AL=7777,FL=7GC0,FLO=Q) 

REFLACE<ALX,CEDIAG,AL=7777,FL=150Q,FLO=Q) 

FINISH. 

COMPLETE. 

ENCRUN. 

7/8/9 END GF RECORD 

READY(NEWSYS) 

REWIND(SYSTEM) 

TRANSFER (CEA, SYSTEM) 

SKIPFC12, SYSTEM) 

TRANSFER <CES*ALX ,DSR) 

TRANSFERS, SYSTEM) 

SKIPF(2, SYSTEM) 

INCLUDEF(SYSTEM) 

INCLUDE (NUCLELS, SYSTEM, CM) 

INCLUOE(SYSOVL,SYSTEM,DS) 

IN CLUCE( FORTRAN, SYSTEM, DS) 

INCLUDE (CO ECL,SYST EM, DS) 

IN CLUDE(RUN2P3, SYSTEM, OS) 

INCLUDE(S>SIO, SYSTEM, DS) 

INCLUOE(SYSMISC,SYSTEM,DS) 

INCLUDE <IGS274,SYSTEM,DS) 

COMPLETE. 

ENCRUN. 

7/8/9 END CF RECORD 

6/7/8/9 ENC CF FILE 



PL 
DEAOSTART 



PULL CUT IF C. E. DIAG NOT IN SYSTEM 



001 
002 
003 
004 
005 
006 
007 
008 
009 
010 
Oil 
012 
013 
014 
015 
016 
017 
016 
019 

021 
022 

024 
025 
026 
027 
028 
029 
030 
031 
032 
033 
034 
035 
036 
037 
036 

040 
041 
042 
043 
044 
045 
046 
047 
048 
049 
050 
051 
052 
053 
054 
055 
056 
057 
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RELEASE DESCRIPTION 

Maintenance tools for SCOPE 3.4 are provided on program library tape PL6 . 
These maintenance tools are divided into three categories: SYMPL compiler. 
Version 3.0 object libraries, and conversion aids. 

The structure of the release format PL6 is as follows: 

SYMPL, as follows 

SYMPL source in UPDATE program library format 
SYMPL compiler in relocatable binary 
SYMPL compiler in absolute overlay binary 
SYMPL object library in relocatable binary 

Version 3.0 object library source and binary 

V3 FTN Object Library PL 

V3 FTN Object Library Binary 

V3 COBOL Object Library PL 

V3 COBOL Object Library Binary 

V3 SORT Object Library PL 

V3 SORT Object Library Binary 

Conversion Aids 

Conversion Aids source in UPDATE program library format 
Conversion Aids binary 

Installation Decks 

SYMPL installation decks 

V3.0 FTN Object Library installation decks 
V3.0 COBOL Object Library installation decks 
V3.0 SORT Object Library installation decks 
Conversion Aids installation decks 

A, SYMPL 

SYMPL (Systems Programming Language) is designed to facilitate systems 
programming; it does not contain some features normally found in higher level 
languages, such as complex arithmetic and input/output capability. Instead, 
it contains features particularly suited to systems programming — bit 
manipulations, based arrays, and an elementary macro capability. It produces 
code optimized for efficient register and functional unit usage, particularly 
oriented toward the 6600 computer. 



Files 
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GENERAL DESCRIPTION 

The SYMPL compiler is written mainly in SYMPL; only the system interface 

routines are in COMPASS. Thus an absolute binary of SYMPL is necessary for 
installation if changes are to be made to the source. 

INSTALLATION PARAMETERS 

SYMPL has no installation parameters. 

INSTALLATION PROCEDURES 

Before SYMPL can be installed, SCOPE, COMPASS, Record Manager and the FORTRAN 

Extended object library must have been installed previously. SYMPL can be 
updated and installed with the following jobs. Job SYMPL1 updates the SYMPL 

library tape. Job SYMPL2 edits SYMPL into the system from a SYMPL program 

library tape. To obtain the installation decks for SYMPL, perform a job of 
the type: 

job card. 

REQUEST PL6,E. Mount Maintenance Tools Tape 

REWIND PL6. 

SKIPF(PL6,12,17) 

COPYBF (PL6 , PUNCH, 2) 

UNLOAD PL6. 

6/7/8/9 

NOTE: The T7000 parameter on the SYMPL1 job card must be changed to T20000 if 
the deck is to be run on a 6200. 

SYMPL1,CM1QQ00Q,T7000,MT2. JOi 

COMMENT. THIS JOB UPDATE AND ASSEMBLES SYMPL. 002 

COMMENT. THE NEW PL6 WILL CONTAIN 12 FILES. 003 

COMMENT. FILE 1— SYMPL OLDPL JJJ 

COMMENT. FILE 2 RELOCATABLE BINARY FOR COMPILER ROUTINES 005 

COMMENT. FILE 3 ABSOLUTE BINARY CF COMPILER 006 

COMMENT. FILE ^-^RELOCATABLE BINARIES OF OBJECT ROUTINES 007 

COMMENT. FILES 5 THRU 12 ARE THE VERSION 3.0 0LDPL*S ANO BINARIES OF 008 

COMMENT. THE FTK, COBOL, SORT LIBRARIES ANO THE CONVERSION AIDS. 009 

COMMENT. THIS JOB UPDATE ANO ASSEMBLES SYMPL. 010 

LABEL,FL6IN,R,LsMAINTT00LS*3P^,D*HI> 011 

REQUEST, PL6,N, HI. °* 2 

LAEEL(FL6,W,L=MAINTT00LS*3P^,D=HI) 013 

REWIND,PL6IN,PL6. JJ* 

C0PYBF(PL6IN,CL0PL) ° 15 

C0FYBF(PL6IN,REL0C) 016 

SKIPF(PL6IN, 1,171 0J-7 

C0PYEF(PL6IN,0BJ) ° 18 

REWIND(0LDFL,REL0C,0BJ1 019 

UPCATE(W,N) 020 

SYMPLU=COMFILE,B=SRR,L*0) ° 21 

COMPASS(I=CQMFILE,B=SRR,S=IOTEXT,S=IPTEXT,L=0) 022 

COMPASS(I=CCMPILE,B=SRR,L=0) ° 23 

REWINDjSSR. 02£ 

COFYL(RELCC,SRR,SLGO! 025 

LOAO<SLG0> 026 

NOGO. 0Z7 

REWINC,SYMFL,SLGO. 028 

REWINO(SRR) ° 29 
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COFYL(CBJ,SRR,NCBJ) 


C0FYBF(NEKFL,FL6) 


C0FYEF(SLGC,FL6> 


C0FYEF(SYfFL ? F16) 


REWIN0<NGEJ,PL6IN) 


C0FYEF(NCEJ,PL6) 


SKIPF<FL6IN,4,17> 


C0FYEF(FL6IN,FL6,8) 


UNL0AC(FL6IN,FL6> 


7/8/9 END CF RECORD 


*C CRFLST,ENOSYH 


*C INIT52,ENDCCfP 


*C SYHIOjEKCOEJ 


*/ ADD CCRRECTICNS HERE 


7/8/9 END CF RECORD 


6/7/8/9 ENC CF FILE 



030 
031 
032 
033 
034 
035 
036 
037 
038 

040 
041 
042 
043 



SYt<PL2,CM55 0QC,T7O0,MTi. 

COKMENT. THIS JCB EDITLIBS THE SYKPL BINARIES* INTO THE RUNNING 

COMMENT. FRCM THE PL6 TAPE. EITHER THE RELEASED VERSION OF FL6 

COMMENT. VERSION CREATED BY THE DECK SYMPL1 MAY BE USED. 

LAEEL<FL6,R,L=HAINTT00LS*3F4,D=HI) MOUNT PL6 

REfcINC,FL6. 

SKIPF<FL€,2,17) 

COFYBF(PL6,SYHP) SYMPL COMPILER BINARIES 

BKSF(SYMF,i) 

COFYEF(PL6,SYMF) SYMPL OBJECT TIME BINARIES 

REKIN0,PL6,SYMF. 

UNLCAC(FL6) 

EDITLIE(SYSTEM) 

COMMENT. *** END OF JOB *** 

7/8/9 END CF RECORD 

READY(SYSTEH) 

LIERARY(NUCLEUS,OLD> 

REFLACE(SYKFL,SYMP,AL=3,FL=5 2Q0 0,FLO=l) 

FINISH. 

LIERARY(SYSCVL,CLO) 

REFLACE(SYMF10+SYMP52,SYMPJ 

FINISH. 

LIERARY(SYSIO,CLD) 

REFLACE(*,SYMF) 

FINISH. 

COfcFLETE. 

ENDRUN. 

7/8/9 END CF RECORD 

6/7/8/9 ENC CF FILE 



SYSTEM 
OR THE 



001 
002 
003 
004 
005 
006 
007 
008 
009 
010 
Oil 
012 
013 
014 

016 
017 
018 
019 
020 
021 
022 
023 
024 
025 
026 
027 



VERIFICATION PROGRAM 



The best verification of successful installation of SYMPL is satisfactory 
compilation of FORM, QU, and/or QUIDDL. 



60307400 A 



1-8-3 



I B. VERSION 3.0 OBJECT LIBRARIES 

The Maintenance Tools tape contains the object libraries for FORTRAN Extended 
3.0, COBOL 3.0, and SORT/MERGE 3.0 for use in conversion of SCOPE 3.3 jobs to 
SCOPE 3.4. These three object libraries are to be used to satisfy external 
symbols from binary decks created by Version 3 of FORTRAN Extended, COBOL, or 
COMPASS programs containing calls to SORT MERGE 3.0. The Version 3 libraries 
do not use Record Manager for input/ output; they retain calls to CIO. These 
routines are provided solely to allow usage of existing binary decks during 
the 3.3 to 3.4 transition phase. All three of these object libraries contain 
eligible PSR code as published through PSR Summary 312. 

INSTALLATION PROCEDURES 

Separate decks are provided to update and assemble each of the program 
libraries. Separate EDITLIB decks are provided to add the binary provided, or 
that created by the assembly deck, to the running system. To obtain these 
decks perform a job of the type 

Job card. 

REQUEST PL6,E. Mount Maintenance Tools Tape 

REWIND PL6. 

SKIPF(PL6, 14,17) 

COPYBF(PL6,PUNCH,2) PUNCH V3FTN1, 3VFTN2 DECKS 

COPYBF(PL6,PUNCH,2) PUNCH V3COB1 ,V3COB2 DECKS 

COPYBF(PL6,PUNCH,2) PUNCH V3SRT1,V3SRT2 DECKS 

UNLOAD PL6. 

6/7/8/9 

| Note that the deck V3FTN1 will run correctly only under SCOPE 3.3. 

Once the V3FTN2, V3COB2 and/or V3SRT2 EDITLIB operations have completed, job 
SCOPE3 (see section 1) should be run to create a deadstart tape of the running 
system. 

Use of the 3.3 object time routines under SCOPE 3.4 requires an 
LDSET(LIB=SYSMISC/SYSIO) control card prior to the EXECUTE control card. 
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V3FTNi,CM6GQ0G,T700C t MT2. 001 

COMMENT. THIS DECK CAN CNLY RUN N 3 . 3 AND 002 

COMMENT. WILL PRODUCE INCORRECT RESULTS 003 

COMMENT. IF RUN ON 3.4. 004 

COMMENT. THIS JOB UPDATES AND ASSEHBLES THE FTN EXTENDEO V3.0 OBJECT 005 

COMMENT. LIBRARY ROUTINES AND CREATES A NEW PL6A. 006 

COMMENT. THE NEW PL6A WILL CONTAIN 12 FILES 007 

COHMENT. FILES 1 THRU 4— -THE SYHFL CLOPL AND EINARIES. 008 

COMMENT. FILES 5 AND 6 V3.0 FTN GLDPL AND BINARIES. 009 

COMMENT. FILES 7 THRU 12 V3. CCBOL, SORT ANO CONVERSION AIDS OLDPL*S 010 

COMMENT. AND EINARIES. Oil 

LA6EL(FL6AIN,R,L=MAINTT00LS*3P4,D=H> 012 

REQUEST, FL6A,N, HI. 013 

LAEEL(FL6A,W,L=MAINTT00LS*3P4,D=HI) 014 

REWIND, FL6AIN,FL6A. fll5 

C0FYEF(FL6AIN,FL6A,4) 016 

UPCATE(F,F=FL6flIN,N=PL6A,R=C) 017 

COFYEF(ECF,FL6A> 018 

SKIFF<FL6AIN,2,17> 019 

FTN(SYSECIT=ICENT»I=COMPILE,S=IPTEXT,L=Q) 020 

REWINO,LGO. 021 

COFY6F(L6C,FL6A) a2 2 

COFYEF<FL6AIN,FL6A,6) 023 

UNLCAC(FL6AIN,FL6A) 024 

COMMENT. *** END OF JOB *** 025 
7/8/9 ENO CF RECORD 

*/ ADD CCRRECTICNS FOR V3.0 FTN OEJECT LIBRARY ROUTINES ONLY 026 
7/8/9 ENO OF RECORD 
6/7/8/9 ENC CF FILE 

V3FTN2,CM55QQG,T7GG,MT1. 001 

COMMENT. THIS JCB EDITLIBS THE FORTRAN EXTENOEC V3.0 OBJECT TIME 002 

COHMENT. ROLTINES INTO THE RUNNING SYSTEM FROM THE PL6 TAPE. EITHER THE 003 

COHMENT. RELEASED VERSION OF PL6 CR THE VERSION CREATEO BY THE OECK 004 

COHMENT. V3FTM MAY BE USED. 005 

LA6EL(FL6A,R,L=MAINTT00LS*3P4, D=HI> MOUNT PL6 006 

REWIND, FL6A. 007 

SKIPF(FL6A,5,17> 008 

C0FYEF(PL6A,FCRT) FTN V3.0 BINARIES 009 

REWIND, FL6A.FCRT- 010 

UNLOAD (PL6A) Oil 

EDITLIE(SYSTEM) 012 

COMMENT. »*» END OF JOB *** 013 
7/8/9 END CF RECORD 

REACY(SYSTEH) 015 

LIERARY(SYSMISCOLD) 016 

REFLACEC»,FCRT) 017 

FINISH. 018 

COMPLETE. 019 

ENDRUN. 020 
7/8/9 END CF RECORD 
6/7/8/9 ENC OF FILE 
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V3COE1,CM6COOO,T7QOG,MT2. 001 

COMMENT. THIS JGB UPOATES AND ASSEMBLES THE COEOL V3. OBJECT LIBRARY 002 

COMMENT. ROUTINES AND CREATES A NEW FL6B. 003 

COMMENT. THE NEW PL6B WILL CONTAIN 12 FILES 004 

COMMENT. FILES 1 THRU 6-— SYMPL AND V3.0 FTN OLDPL*S ANO BINARIES. 005 

COMMENT. FILES 7 AND 8— V3.0 COBOL OLOPL AND BINARY. 006 

COMMENT. FILES 9 THRU 12 V3. SCRT ANO CONVERSION AIDS OL0PL*S AND 007 

COMMENT. EINARIES. 008 

LAEEL(FL6BIN,R,L=MAINTT00LS*3P4,D=HI) 009 

REGUEST,FL6E,N,HI. q 10 

LAEEL<FL6B,W,L=MAINTT00LS*3P4, D = HI) Oil 

REWIND, FL6EIN,FL6B. 012 

C0FYBF(FLEBIN,FL6B,6) 013 

UPDATE <F,P=FL6EIN,N=PL6B,R=C,X> 014 

COFYEF(ECF,FL6E> 015 

SKIFF(FL6EIN,2,17> 016 

COMPASS < I, S=CFCTEXT,S=IPTEXT,L=0) 017 

REWINCLGO. 018 

C0FYEF(LGC,FL6e) 019 

C0FYEF(FL6EIN,FL6B,4) 020 

UNLOAD CFL6EIN,FL6B) 021 

COMMENT. »«» END OF JOB *** 022 
7/8/9 ENO CF RECORD 

*/ ADD CCRRECTICNS FOR V3.0 COEOL OBJECT LIBRARY ROUTINES ONLY 024 
7/8/9 ENO CF RECORD 
6/7/8/9 END CF FILE 

V3COE2,CM55000,T700,MT1. 001 

COMMENT. THIS JOB EDITLIBS THE CCBCL V3.0 OBJECT TIME ROUTINES INTO THE 002 

COMMENT. RUNNING SYSTEM FROM THE FL6 TAPE. EITHER THE RELEASED VERSION 003 

COMMENT. OF FL6 OR THE VERSION CREATED BY DECK V3COB1 MAY BE USED. 004 

LAEEL(FL6E,fi,L=MAINTT00LS*3P4,D=HI) MOUNT PL6 005 

REWIND, FL6E. 006 

SKIPF(FL6B,7,17) 007 

COFYBF(FL6E,CCE) COBOL V3.0 BINARIES 008 

REWIND, FL6E,CCE. 009 

UNLCAC(FL6E) 010 

EDITLIE(SYSTEM) OH 

COMMENT. *** ENO OF JOB *** 012 
7/8/9 END CF RECORD 

READY(SYSTEM) 01^ 

LIERARY(SYSMISCOLD) 015 

REFLACE(*,CCB) 016 

FINISH. 017 

COMPLETE. 018 

ENCRUN. 019 
7/8/8 END CF RECORD 
6/7/8/9 ENC CF FILE 
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V3SRT,CMfcOOQ0,T7G0G,MT2. 001 

COMMENT. THIS JOB UPDATES AND ASSEMBLES THE SORT V3.0 OBJECT 002 

COMMENT, LIERARY ROUTINES AND CREATES A NEW PL6C. 003 

COMMENT. THE NEW PL6C WILL CONTAIN 12 FILES 004 

COMMENT. FILES 1 THRU 8 SYMPL, V3 FTN AND COBOL OLDPL*S ANO BINARIES. 005 

COMMENT. FILES 9 AND 10 V3.0 SORT OLDPL AND EINARIES. 006 

COMMENT. FILES 11 THRU 12 CONVERSION AIDS OLDPL*S AND BINARIES. 007 

LAEEL(FL6CIN,R,L=MAINTT00LS*3P4,D=HI) 008 

REQUEST, FL6C,N, HI. 009 

LAEEL(FL6C,W,L=MAINTT00LS*3P4, D=HI) 010 

REWIND, PL6CIN,FL6C. 011 

C0FYEF(FL6CIN,FL6C,8) 012 

UPDATE (F,P = fL6CIN,N=PL6C,R=C,X) 013 

C0FYEF(ECF,FL6C) 014 

SKIFF(FL6CIN,2,17) 015 

COMPASS(I,S=CFCTEXT,S=IPTEXT,L=G) 016 

„^. ,,..„. ^„ (147 

C0FYBF(LG0,FL6C) 018 

C0FYEF<PL6CIN,PL6C,2» 019 

UNL0AC(FL6CIN,FL6C) 020 

COMMENT. *** END OF JOB *** 021 
7/8/9 END CF RECORD 

V ADC CCRRECTICNS FOR V3.0 SORT OBJECT LIBRARY ROUTINES ONLY 023 
7/8/9 END OF RECORD 
6/7/8/9 ENC OF FILE 

V3SRT2,CM55000,T7QG,MTi. 001 
COMMENT. THIS JCE EDITLIBS THE SORT/MERGE V3. OBJECT TIME ROUTINES INTO 002 

COMMENT. THE RUNNING SYSTEM FROM THE PL6 TAPE. EITHER THE RELEASED 003 

COMMENT. VERSION OF PL6 OR THE VERSION CREATED BY DECK V3SRT1 MAY 3E 00h 

COMMENT. USEO. 005 

LAEEL(FL6C,F,L = MAINTT00LS*3P<t,D=HI> MOUNT PL6 006 

REWIND, PL6C. 007 

SKIFF(FL6C,9,17) 008 

C0FYBF(FL6C,S0RT) SORT V3.0 BINARIES 009 

REWIND, FL6C, SORT. 010 

UNLCAC(PL6C) Oil 

EDITLIE(SYSTEM) 012 

COMMENT. *** END OF JOB *»* 013 
7/8/9 END CF RECORD 

READY(SYSTEM) 015 

LIBRARY(SYSMISCOLD) 016 

REPLACED, SCRT) 017 

FINISH. 018 

COMPLETE. 019 

ENDRUN. 020 
7/8/9 END CF RECORD 
6/7/8/9 END OF FILE 
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C. CONVERSION AIDS 5 

The following conversion aid programs are provided on the Maintenance Tools 
tape: 



SIFT 
BBT06RM 

R&NCONV 

SPY 

WHEN 
DOCK 
STIMULATOR 



:onvpf 



A program to convert RUN 2.3 programs to FTN 4.0 format. 

A program to convert FORTRAN binary blocked files to files 
that can be processed by SCOPE 3.4 and 6RM. 

A program to convert single level SCOPE name/ number indexed 
files created by COBOL 3.0 or FORTRAN Extended 3.0 to 
indexed word-addressable files that can be processed by 
COBOL 4.0 or FORTRAN Extended 4.0. 

Utility package used to monitor the P register of a CPU 
program and provide an histogram of elapsed time used in 
specific areas of code. 

Control card callable utility that skips over selected 
cards in the control card record. 

Utility for extracting IMS information from the SCOPE 
program library. 

Utility package used to simulate live INTERCOM 4.1 low 
speed terminals. 

Utility allowing conversion of permanent files between 
SCOPE 3.3 and 3.4 formats. CONVPF is also described in the 
SCOPE 3.3 to SCOPE 3.4 Conversion Aids PSB. 
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INSTALLATION PROCEDURES 

Before the Conversion Aids can be installed, FORTRAN Extended must be in the 
running system. Job AIDS1 updates and compiles File 11 creating a complete 
revised PL6. Job AIDS2 adds binary from File 12 to the running system. Jobs 
AIDS1 and AIDS2 may be obtained by performing a job of the type: 

Job card. 

REQUEST PL6,E. Mount Maintenance Tools Tape 

REWIND PL6. 

SKIPF(PL6,20,17) 

COPYBF ( PL6 , PUNCH , 2 ) 

UNLOAD PL6. 

6/7/8/9 

Once AIDS2 has completed, job SCOPE3 (see section 1) may be run to create a 
deadstart tape of the running system. 



AICS1,CM730 0,T700 0,MT02. 



COMMENT. 
COMMENT. 
COMMENT. 
COMMENT. 
COMMENT. 
COMMENT. 
COMMENT. 
COMMENT. 



HIS JOB UPOATES ANO 
HE NEW PL6D WILL CO 
ILES 1 THRU 4 CONTA 
ILES 5 THRU 6 CONTA 
ILES 7 THRU 8 CONTA 
ILES 9 THRU 10 CONT 
CONTAINS THE 
CONTAINS THE 



ILE 11 

ILE 12 

REGUEST(CLOFL,E,HY) LATEST 

UPCATE<Q,N*FANFL) 
UNLOAD (OLOPL) 

LA£EL(FL60IN,R»L=MAINTT00L5*3P 
REGUEST(PLeC,N»MI) SCRAT 

LA EEL (FL60 ,W >L=MAINTT00LS*3P4, 
RENINC(FL6DIN,FL6D) 
C0FYEF<PL60IN,PL60,1Q> 
UPCATE<F,P = FL60IN,N=PL60fR=C) 
C0FYEF(ECF,FL6C) 
UNL0A0CFL6CIN} 

COMPASS<I=CCMFILE,S=SCPTEXT,L= 
COMFASSU=CCMFILE,S=SCPTEXT,L= 
FTN(I=COMFILE,S=IOTEXT,S=CPCTE 
COFYER (COMPILE, ML) SKIP 

RUN(S,,,CCMFILE,NUL,AIO) 
COMFASS(I=CCMFILE»S=0,L=0,E=DO 
COMPASS(I=CCMPILE,S=0,LsO»G=00 
RENINO(AIDS) 
LDSET<FRESET=ZERO) 
LOAO(AIDS) 
NO GO. 

REHNO(AIO) 
LOAO(AID) 
NO GO. 

RENINOCAIOES,LGCI 
C0FYBF<LGC,FL6C) 
BKSP(FL60,D 
C0FYEF<AI0ES,FL6D> 
UNLOAD (PL6C) 
7/8/9 EKO CF FECORO 



ASSEMBLES THE 3.4 CONVERSION AIOS. 
NSIST OF 12 FILES. 
IN SYMPL OLOPL ANO BINARIES. 
IN V3FTN OBJECT CLDPL AND BINARY. 
IN V3COB0L OBJECT OLOPL ANO BINARY 
AIN V3S0RT OBJECT OLOPL ANO BINARY 

CONVERSION AIOS OLOPL 

BIN/RIES OF CONVERSION AIOS. 

SCCFE PL 



4,D=HlJ 

CH TAPE FOR NEW FL6D 

D=HI) 



0) 

0,B-AI0S) 

XT»OFT=itL=0,B=AIuSi 
F SIFT OEBUGGING AIO 

CTEXT) 
CTEXT) 



001 
002 
003 
004 
005 
006 
007 
008 
009 
010 
011 
012 

n a "» 

014 
015 
016 
017 
018 
019 
020 
021 

022 

«#■»•» 

024 
025 
026 
027 
028 
029 
030 
031 
032 
033 
034 
035 
036 
037 
038 
039 
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♦CCMFILE ,FFMAC 041 

7/8/9 END CF RECORD 

*/ ACC CORRECTIVE CODE HERE Q43 

7/8/9 END CF RECORD 

6/7/8/9 ENC CF FILE 

AICS2,CM550QO,T700Q,MT01. QUI 

CC*M£M. THIS JOB EOITLIBS THE BINARIES OF THE CONVERSION AIOS INTO 002 
COMMENT. THE RUNNING SYSTEM. EITHER THE RELEASE VERSION OF PL6 OR THE 003 

COfHEM. VERSION CREATED PY DECK AIOS1 MAY BE USED. 0Q4 

LAEeL<PL60,R,L=^AINTTOOLS*3P4> MOUNT PL6 005 

REHNC(FL60) 006 

SKIPF<FLeCtll,l7) 007 

COFVEF(FLtCAICS) 008 

UNLOAC(FteC) 009 

EOITLIF(SVSTEH) 010 

COMMENT. *** ENO OF JOB *** Oil 
7/8/9 ENC CF RECORO 

REAOY<<ySTEM> 013 

♦/ REHCWE THE FOLLOWING CARD IF STIMULATOR IS NOT TO BE INSTALLEO 014 

RE PLACE < tSPtlVG, AIDS! 015 

♦/ REHCVfc THE FOLLOWING CARD IF SPY IS NOT TC BE INSTALLED 016 

REPLACE CSFY*SF2,AIOS) 017 

LlERARY(NLClEOS,OLD> 018 

V REfCvE THE FOLLOWING CARD IF STIMULATOR IS NOT TO BE INSTALLED 019 
REFLACfc(SIP,AICStAL=3,FL=2CG0Q,FLC=l> 020 
»/ REMCVE THE FOLLOWING CARO IF SPY IS NOT TC BE INSTALLED 021 
REPLACE<*CFSPY$*$,AIOS,AL=i) 022 
»/ RErCtfE THE FOLLOWING CARD IF DOCK IS NOT TO BE INSTALLEO 023 
RE PLACE (CCCK,AICS,AL=3,FL=lb00 0,FL0=l) 024 
•/ REMOVE THE FOLLOWING CARD IF WHEN IS NOT TO BE INSTALLED 025 
REFLACE<*»HEH,AICS,AL=3,FL=12Q0 ,FLC = 1> 026 

■»/ REHCVE THE FOLLOW CARD IF EBT06RM IS NOT TO BE INSTALLED 027 

REPLACE «etTCfcfif,AIDS,AL=3,FL=10000|FLO=l) 028 

♦/ RE^twt THE FOLLOWING CARO IF RANCONV IS NCT TO BE INSTALLED 029 

RtFLACE <fiAKCCNtf,AIOS»AL=3,FL=6 000,FLC=i) 030 

•/ REHCVt THE FOLLOWING CARO IF SPY IS NOT TC EE INSTALLEO 031 

REFLACE (FRMSFY,AIOS,AL = 1,FL=350CO) 032 

V REHCVt THE FOLLOWING CARO IF CONVPF IS NOT TO BE INSTALLEO 033 
R£FLACE(CCMFF,AIDS,AL=7777,FL=300QO,FLO=Q> 034 
•/ Rt*CvE THE FOLLOWING CARD IF SIFT IS NOT TO BE INSTALLED 035 
REFLACE(SIFT,AICS,AL=3,FL=3^0ilO,FLO=l) 036 

V REWCVfc THE FOLLOWING 3 CARDS IF STIMULATOR IS NOT TO BE INSTALLED 037 
RE PLACE (CA TAR, A IDS f AL = 3,FL=bCC 00 ,FLO=l> 038 
RtFLACECSCRT,AICS,AL=3,FL=57QQ0,FLO=l> 039 
R£PLACE(LfcE,AICS,AL=3,FL=b20 00,FLC=l) 040 
FINISH. 0^1 
COMPLETE. 042 
ENCRUN. 0^3 
7/8/9 ENC OF RECORD 

6/7/8/9 ENC CF FILE 
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D. USAGE OF PF CONVERSION AIDS | 

Usage instructions for SIFT may be found in SIFT (FORTRAN Translator Program 
PSB, publication 60358400). 

CJsage instructions for BBT06RM, RANCONV, WHEN, and SPY, may be found in SCOPE 
V3.3 to SCOPE V3.4 Conversion Aids PSB, publication 60358200. 

Osage instruction for the other conversion aids are as follows. 

D. 1 WHEN Use in a SCOPE 3.3 Environment | 

During conversion from SCOPE 3.3 to SCOPE 3.4, the compass source language 
utility WHEN allows control cards unique to one environment to be skipped in 
the other. As WHEN is not a part of the standard SCOPE 3.3 environment, the 
following job structure may be used for entering WHEN into a 3.3 system 
through EDITLIB. 

JOB,CM55000,T100,MT01. 

REQUEST OLDPL,E,HI. MOUNT 3.4 CONVERSION AIDS PL 

SKIPF(OLDPL, 10,17) 

COPYBF(OLDPL,PL) 

UPDATE (Q,P=PL) 

COMPASS (I=COMPILE,S=SCPTEXT,L=0) 

REWIND LGO. 

LOAD (LGO) 

NOGO. 

REWIND AIDES. 

EDITLIB, 

7/8/9 

*C WHEN 

7/8/9 

READY (SYSTEM) 

RPADD (WHEN, AIDES) 

COMPLETE. 

6/7/8/9 
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I D.2 ; DOCK USAGE 



DOCK is a FORTRAN source language utility for extracting lis table Internal 
Maintenance Specification information from a COMPILE file generated from the 
SCOPE 3.4 program library. 

The control card directive is of the form; 

DOCK(p1 ,p2,p3,. . . ,pn) 
Definition: 

Default, if parameter is not specified. 

Assumed, if parameter is specified, but not equivalenced. 

1= Name of program source file. (Assumed to be an update COMPILE or 
source file not exceeding 90-column BCD characters.) Default = 
SOURCE, Assumed = COMPILE. 

L= Name of file containing documentation list; (cannot be the same name 
as I) • Default = Assumed = OUTPUT. 

F= Up to 25 characters to be printed in the bottom left corner of each 
page of documentation. 

Default = INT, Folio = SINTERNAL DOCUMENTATION. $ 
EXT, Folio = $EXTERNAL DOCUMENTATION. $ 
Assumed = $1 M S.$ 

INT Internal; all internal and external documentation will be listed on 
file L. 

EXT External; only external documentation will be listed on file L. 
Default = INT. 

INDEX At the end of each routine processed an index is printed, all symbols 
found in location field of EJECT, SPACE, TITLE, and TTL cards. 
Default = INDEX off. 

NR No rewind of input file. (I) Default = rewind of INPUT. 

NT No table generation. Default = table generation. 

NP No propogation of page numbers across routine. Default = on. 

TE Documentation file, L, formatted for input into program TEXTJAB. 
Default = off. 
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Default Parameter Settings: 

DOCK (I = SOURCE, L=OUTPUT,F=$ INTERNAL DOCUMENTATION. $, INT, P) | 

Assumed Parameter Settings: 

DOCK (1= COMPILE, L=OUTPUT,F=$ INTERNAL DOCUMENTATION. $, INT, P) | 

The following dayfile messages are issued by DOCK: 

FL TOO SHORT FOR DOCK. (REQUIRES 12K) . 

Not enough field length was allowed; current minimum field length is 1 0K 
(octal) . 

FILE NAME CONFLICT. 

Input, I, and List, L, file names are the same. 

MEMORY OVERFLOW IN BUILDING INDEX TABLE. 

Not enough field length for index table; increase by 4K (octal). 

EMPTY INPUT FILE. NO DOCUMENTATION PRODUCED. 

Input file was empty. 

INPUT FILE NAME IS ILLEGAL. 
OUTPUT FILE NAME IS ILLEGAL. 

Illegal character specified in file name. 

FILE EQUIVALENCE MAY NOT BE 0. 

A file parameter cannot be set to zero. 
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D..3 STIMULATOR OPERATING INSTRUCTIONS 

D.3.1 Automatic Table Setting: 

The STIMULATOR is revised to automatically set the EST and mux-subtables if 
the user so specifies. The new operating procedures are as follows: 

Bring up the STIMULATOR at any NEXT control point, read in the SIP job. 

After requesting appropriate tape assignments, the STIMULATOR asks: 

DO YOU WANT AUTOMATIC TABLE SETTING — N.YES OR N. NO 

When the answer is YES, the STIMULATOR makes the following checks: 

Is INTERCOM already up? If so, the following diagnostic is issued and the 
SIP job drops: 

INTERCOM IS ALREADY UP — DROP INTERCOM TO CONTINUE 

If INTERCOM is not already up, the STIMULATOR checks for a mux-subtable 
pointer in low core. If no pointer is found, the following diagnostic is 
issued and the SIP job drops. 

ERROR— DONT HAVE MUX SUBTABLE DEFINED 

If both checks are passed: 

The STIMULATOR searches the EST until it finds either a YC or DC entry 
(turned OFF) • When not enough YC or DC entries are found in the EST, the 
following is displayed: 

NOT ENOUGH EXISTING EST YC OR DC ENTRIES— SET MANUALLY 

EST YC entries will not be created because a valid mux-subtable pointer 
cannot be chosen arbitrarily. 

When a valid YC or DC entry is found, the entry is changed to YC if 
necessary; and the channel number from the SIP card C parameter is used. 

The mux-subtable pointer from this EST entry is used to modify the 
appropriate mux-subtable. The SIP card T parameter is placed in the mux- 
subtable to indicate the number of Teletypes. 

The mux table header word also is set to indicate a STIMULATOR run. 

When all tables are set properly, the following message is displayed: 

—OFF EXTRA MUXS THEN BRING UP INTERCOM— 

When INTERCOM is brought up, the following is displayed, and the STIMULATOR 
run is continued: 

CONTINUE SIMULATION 

The STIMULATOR changes only the first one or two EST entries encountered 
(depending on M parameter of SIP card) . 
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If NO is the answer to DO YOU WANT AUTOMATIC TABLE SETTINGS the following is 
displayed: 

YOU ARE RESPONSIBLE FOR TABLES SETUP — TYPE N.GO TO CONTINUE 
Thus, the user can set tables manually if he wishes. 
D. 3.2 Manual Table Setting: 

The EST must contain an entry for a 6676 multiplexer specifying the channel to 
be used for the stimulation. The entry should point to a valid multiplexer 
subtable. The entry can be typed manually after unlocking the keyboard. For 
example: if the entry is to be at 2532 in memory, type: 

2532,0000 0004 0000 3103 0002. 

Points to 1st 
Channel Equip YC entry in mux 
# # Mnemonic subtable 

The mux header word must have byte 4 set to the value 1. The INTERCOM pointer 
word (word 16, byte 1) points to this word. For example, if word 16 points to 
5640 type: 

5640,4, 1. 

The mux table must be set to reflect the number of terminals (this value must 
agree with the SIP card T parameter) . Type: 

5642, OOxx. xx=number of terminals 

D.3.3 Running Two Multiplexers 

Case one: two 6676 , s simulated on the same channel 

The M parameter on the SIP card should be set to 2. The T parameter should 
indicate the number of terminals on each mux. The STIMULATOR input tape must 
contain as many sessions as the total number of terminals: 2*T. Two EST YC 
entries and two mux subtables are required. (Assemble the INTERCOM driver 
with IP.N6676 EQU 2.) 

Case two: One simulated 6676 and one actual 667X on another channel 

It is possible to simulate one 6676 multiplexer and at the same time run 
another actual hardware 6671 or 6676 multiplexer on a different channel. In 
this case, the user must ensure that an EST entry and mux subtable also exist 
and properly define the live multiplexer and its terminals. 

The SIP parameters are set in the same way as for one simulated multiplexer. 

D.3.4 Bringing up INTERCOM and the STIMULATOR: 

Please refer also to Automatic Table Setting instructions. 

Bring up INTERCOM by typing: INTERCOML. 

The STIMULATOR can be run at any available control point but it should be 
locked in to avoid attempts to roll it out. Type in: 



n. LOCK IN. 
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Background batch can be run as desired. Remember, in SCOPE 3.4, any NEXT 
control point can be used to run both INTERCOM and batch jobs. 

The STIMULATOR will drop automatically when INTERCOM is dropped. To drop 
INTERCOM type: r 

INT ERCOML, DROP. 

D..3. 5 Description of STIMULATOR Parameters: 

h maximum of two tapes is required for a simulation run: TAPEI and TAPEO. 
TAP EI is the input tape containing the Teletype programs to be simulated 
during the run; this tape must be assigned for all simulation runs. TAPEO is 
used for recording all system output resulting from the simulation; it is 
required if the user selects the option to recover system output. The 
STIMULATOR re guests assignment of the appropriate tapes during its 
initialization phase. 

The STIMULATOR is called with a Program Call control card of the form: 

SIP(Mx,Txxx,Dxxx,Sxxxx,Lxx,Cxx,Ox,Fxxxx) 

The parameters M,T,D,S,L,C,0,F are order independent, all values are octal: 

Mx Number of simulated multiplexers (maximum of 2) 

Txxx Number of Teletypes per multiplexer (1-100) 

Dxxx Number of Teletypes per multiplexer to activate dynamically 
every S cycles 

Sxxxx Time interval in octal cycles for activating D Teletypes (one 
cycle equals approximately 200 ms) 

Lxx implies each TTY is to simulate all input programs for current 
run. 

L=0 option requires INTERCOM modifications, as same user would 
LOGIN at more than one terminal. 

1-77 indicates the number of times each TTY is to loop on its 
assigned program 

Cxx Channel number of simulated multiplexers 

°x Zero implies recover system output, non-zero implies to bypass 
output 

Fxxx File number of TAPEI to be used for current SIMULATION 

The following default values are assumed: 

M = 1 

T = 1 

D = 

S = 

L = 1 

O = 

F = 1 
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If the channel parameter C is not specified, SIP will be terminated with an 
error messages. The only restriction on the S parameter: 




The following sample deck will perform the data acquisition for a 20 terminal 
simulation on one multiplexer: 

JOB1,T1000,MT02,CM20000. 

SIP(M1,T24,D24,S1,L2,CO,00,F1) 

6/7/8/9 



D.3.6 STIMULATOR Input Card Format ( 

rest programs are stored on cards for input to INTERCOM via the STIMULATOR. 
Each card image represents one Teletype line of information. The first 
character must be punched in column 1 and the last character must be a v (11-0 
punchy . 

If the input line will generate a line feed as the only response from 
INTERCOM, as with text editing under EDITOR, the character (0^8-7 punchy 
must precede the character v (11-0 punch) on the card. The STIMULATOR 
interprets the character for internal purposes only; it is sent to INTERCOM 
as a blank. The v character is transmitted to INTERCOM as a carriage return. 

Each test program must begin with the LOGIN procedure and end with the LOGOUT 
system commands. The main body of the test program can contain any 
combination of system commands, source input, or data. Essentially, each test 
program represents a complete user session at a Teletype from LOGIN to LOGOUT. 
In converting programs from Teletype input to cards for STIMULATOR input, the 
differences in character sets must be considered. For example, the quotations 
character " for Teletypes is the equivalence character (=, 0-8-6 punch) on 
cards. For a more detailed description of display and TTY characters refer to 
INTERCOM section (14) of this document or the INTERCOM 4 Reference Manual 
(publication no. 60307100). 

The card images can be copied to tape with the COPYBF utility. EOR's separate 
each test program. 

Since the following characters have special meaning to the STIMULATOR, they 
should not be used as data in the input tape: 

V indicates carriage return 

A indicates EDITOR text editing line 

[ indicates control X 

] indicates control 2 

example: ] A gives user abort 
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Example of input tape preparation: 

JOB,MT01. 
REQUEST, TAPE, HI. 
COPYBF (INPUT, TAPE) 
7/8/9 
LOGIN. v 

NAMEv (user name) 
PASSWDv (user password) 
EDITOR. V 
FOR,Fv 

10 PROGRAM Z (INPUT, OUTPUT) v 
20 PRINT 10av 

3 READ 20, Aav all text editing commands require 

a character before v character 

• 

160 ENDav 
RUN,FTNv 

2.0v 

3.0v 
BYEV 

LOGOUT. V 
7/8/9 

(second test program) 
7/8/9 



7/8/9 

(last test program, maximum ot 64) 
7/8/9 
6/7/8/9 
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D.3.7. Data Reduction Phase: | 

The following sample deck will perform data reduction of the STIMULATOR output 
tape: 

JOB2,CM55000,T1000,MT01. 

REQUEST, TAPE1 ,HI. STIMULATOR OUTPUT TAPE 

REWIND(TAPEI) 

DATAR. 

6/7/8/9 

DATAR will give the following output: 

A raw output showing: number of Active Terminals, all response times, and a 
two-word debugging output for each response, 

A histogram which slots all response times and calculates a mean and standard 
deviation. The cumulative probability column gives the probability that 
response time will be less than a given number of seconds. If cumulative 
probability is .4891 and the interval is 10.5-11.0, 4 8.9% of all response 
times were less than 11.0 seconds. 

The following deck will give a more detailed report of the simulation: 

JOB3,CM60000,T7777,MT2. 

REQUEST, TAPEO, HI. STIMULATOR OUTPUT TAPE 

REWIND(TAPEO) 

COPYBF (TAPEO, TAPE2) 

SORT . 

REQUEST-TAPE3.HI. STIMULATOR INPUT TAPE 

REWIND, TAPE1,TAPE3. 

LEE(LC=77777) 

7/8/9 

6/7/8/9 

LEE will give a detailed report of the activity for each terminal. For each 
command, the response received will be shown as well as the response time in 
seconds and milli-seconds. 



D. 3=8 Miscellaneous Information: 

Normally, the STIMULATOR will shrink its field length to the minimum required. 
If it is necessary to simulate a machine with less CM than is actually 
available (e.g., 49K) , the CM on the STIMULATOR Job card can be set 
accordingly and FL reduction can be prevented by the following modification: 

*IDENT, FIXCORE 
♦DELE TE,VSM. 335 
*DELETE,VSM. 358 
♦COMPILE, VSM 



I 
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The operator can examine the data captured by the STIMULATOR by displaying the 
output tape buffer and the TTY output pots. Suppose the STIMULATOR is running 
at JDT 20: 

Type: C = 20 

Cycle display until the FET for TAPEO is found (about 350) FIRST will be about 
2 040, type: C4,2040. for beginning display of TAPEO buffer. 

The display can be cycled until OUTPUT pots are found. The OUTPUT pots are 
two 8-word buffers per TTY that give an up-to-date account of the data being 
received by each terminal. They are located near 3000 relative to RA. 

ID.;3.9 Type time: the release version of the STIMULATOR has a built in type 
time of seconds. To change the type time, the following modification should 
be made to 1VG: 

*IDENT,TYPET 
♦DELETE, THHH.1 

ADN x (x is the type time in octal seconds; must be <77) 

♦COMPILE, 1VG 

|d.3.10 Changes to INTERCOM: 

At times, changes should be made to INTERCOM depending on the type of 
simulation. 

When more than 30 terminals are running, the EDITOR buffers should be 
increased appropriately. Refer to the INTERCOM V4. 1 section of this document 
for description of EDITOR parameters. 

The appropriate version of the INTERCOM driver must be available. The TYPEJ 
variant with IP.N6671 EQU and IP.N6676 EQU 1 is required for a one 
multiplexer simulation. For other variations, the appropriate version of the 
driver msut be assembled. Refer to the INTERCOM V4.1 section for more 
details. 

| D. 3. 1 1 Hardware Resources needed by the STIMULATOR: 

If the output is being saved on tape the STIMULATOR requires two dedicated 
PP»s; but only one is required if output is not saved. 

A free data channel with no equipment on it is required for communication 
between the STIMULATOR and the INTERCOM drivers. Equipment is used for the 
first multiplexer and 1 for the second. 

The STIMULATOR uses one control point; the field length depends on the length 
of the input tape and the number of simulated terminals. (Approximately 15K 
(octal) for a typical run consisting of one mux and an input tape consisting 
of 64 sessions, 30 lines per session.) 
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E. CONVPF UTILITY 

The CONVPF utility allows the conversion of SCOPE permanent files between 
SCOPE 3.3 and SCOPE 3.4: 

When the conversion is from SCOPE 3.3 to SCOPE 3.4 CONVPF execution is the 
last operation performed under the running SCOPE 3.3 system before a system 
load of SCOPE 3.4. 

When the conversion is from SCOPE 3.4 to SCOPE 3.3, CONVPF execution is the 
last operation performed under the running SCOPE 3.4 system before a system 
load of SCOPE 3.3. 

Procedures for using the CONVPF utility: Ensure that RBR descriptions of the 
PFD and PF devices are identical in both SCOPE 3.3 and SCOPE 3.4 system; 
correspondence of RBR ordinals for these devices must be the same in number 
and name. The best procedure is to construct the RBR table in the respective 
CMRs identically; however, the objective can be achieved by careful 
reconfiguration at deadstart time. If the RBR correspondence is not assured, 
several error diagnostics from deadstart could be displayed, such as, RB 
CONFLICT. 

CONVPF requires a comparable interface relationship in both the SCOPE 3.3 and 
SCOPE 3.4 ^environments. The following PSRs must be installed to ensure that 
CONVPF will-: function as intended in both environments. Ensure the following 
PSRs :are"installedj 

SCOPE 3.3: 

SC31474 (PSR summary 322) 6 PC only removes FNT for FNTs with APF 

~*-;»4~ a i «,-F TTlTa Crm-Hpes af-fQC?+&ii* F.PP - 6 PC 

SC31485 (PSR summary 324) Stack processor does not read ahead if the 
exact bit is set on a PP read. Routines affectdd: 1SP, PFC, PFA, PFR, 
LPF. 

SC314 86 (PSR summary 326) IRCP does not recognize RBT word pairs not 
being split across PRUs of RBTC. Routine affected: IRCP. 

SCOPE 3.4: 

SC4 0036 (PSR summary 324) IRCP doubles the values of the EOI PRU in 
the RBT chain of the PFD when permanent files are recovered after a 
TRANSPF of the permanent file tables. Routine affected: IRCP. 

SC4003 9 (PSR summary 324) IOP modified to not issue INDEX BUFFER NOT 
SPECIFIED message to the B-display. Routine affected: IOP. 

SC40040 (PSR summary 324) PFD is modified to support CONVPF. Routine 
affected: PFD. 
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Execution of the CONVPF utility -SCOPE 3.3 
Step 1. EDITLIB routines CONVPF, PFD 

CONVPF, a FORTRAN Program and its partner PP program, PFD, will not 
be a part of the standard SCOPE 3.3 system. Therefore, EDITLIB 
should be used. The following job setup, to be run under 3.3, is 
suggested: 

Job card. 

REQUEST (OLD PL, HI, E) MOUNT SCOPE 3.4 CONVERSION AIDS PL 

SKIPF(OLDPL,10,17) 

COPYBF(OLDPL,PL) 

UNLOAD (OLDPL) 

UPDATE(Q,P=PL) 

FTN(I-COMPILE,S=SCPTEXT,OPT=1,L=0) COMPILE CONVPF) 

REWIND (LGO) 

LOAD (LGO) 

NOGO. 

REWIND (AIDES) 

REQUEST (OLD PL, HY,E) REQUEST SCOPE 3.4 PL 

UPDATE(Q,X) 

COMPASS (I=COMPILE,S=SCPTEXT,L=0 , B=BIN) 

REWIND(BIN) 

EDITLIB. 

7/8/9 

♦COMPILE CONVPF 

7/8/9 

♦COMPILE PFD 

7/8/9 

READY (SYSTEM) 

RP ADD (CONVPF, AIDES, DS) 

RPADD(PFD,BIN,DS) 

COMPLETE. 

6/7/8/9 
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Step 2. Idle running system. 

Step 3. Type in n. X CONVPF. 

Step 4. Communicate with CONVPF utility. 
Dialogue: 

CONVPF: NUMBER (OCTAL) OF SUBDIRECTORIES IN 3.4 - GO OR CFO 

OPERATOR: n.GO. 

A GO. response will result in the same number of subdirectories 
as SCOPE 3.3 is using. (Note: In SCOPE 3.3, the number of 
subdirectories in CMR includes subdirectory zero; however, in 
SCOPE 3.4, subdirectory zero does not exist. Therefore, on a 
GO. response, the SCOPE 3.3 CMR value for the number of 
subdirectories will be decremented by 1 and used as the number 
of subdirectories for the target SCOPE 3.4 system.) Or, 

OPERATOR: n.CFO m. 

The value m should be the value of N.SD in the SCOPE 3.4 CMR 
that will be used. 

CONVPF: mB SUBDIRECTORIES - GO OR DROP 
CONVPF will echo the value that will be used. 
OPERATOR: n.GO. 

The operator believes CONVPF to have the correct value. Or, 
OPERATOR: n.DROP. 

The operator believes his response was incorrect. 

CONVPF: NUMBER (OCTAL) OF ENTRIES PER SUBDIRECTORY IN SCOPE 3.4 

- GO or CFO 
OPERATOR: n.GO. 

The SCOPE 3.3 CMR value for N. ESD will be used in the 

construction of the SCOPE 3.4 PFD. Or, 
OPERATOR: n.CFO m. 

The value m should be the value of N.ESD in the SCOPE 3.4 CMR 

that will be used. 

CONVPF: mB ENTRIES PER SUBDIRECTORY - GO OR DROP 
OPERATOR: n.GO. 

Correct value. Or, 
OPERATOR: n.DROP. 

CONVPF: NUMBER (OCTAL) OF PRUS/20B IN 3.4 RBTC-GO OR CFO 
OPERATOR: n.GO. 

The SCOPE 3.3 CMR value for N.RBTC will be used for the SCOPE 

3.4 RBTC. Or, 
OPERATOR: n.CFO m. 

The value m will be used for the value of N.RBTC in SCOPE 3.4. 

This is the only value which need not be identical to the 

respective value specified in the SCOPE 3.4 CMR. 

CONVPF: mB PRUS/20B IN RBTC-GO OR DROP 
OPERATOR: n.GO. Or, 

OPERATOR: n.DROP. 
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CONVPF: CONVPF FIELD LENGTH (OCTAL THOUSANDS) , DEFAULT IS 50 B 
-GO OR CFO 

OPERATOR: n.GO. 

50000B will be used as field length. Or, 

OPERATOR: n.CFO m. 

m thousand will be the field length used; the larger the field 
length that is used the faster the routine will execute. 

CONVPF: m 000B FIELD LENGTH -GO OR DROP 
OPERATOR: n.GO. Or, 

OPERATOR: n.DROP. 

CONVPF: PFDUMP OR CONVPF REQUEST - GO OR DROP 
OPERATOR: n.GO. Or, 

OPERATOR: n.DROP. 

At this point CONVPF is requesting permission to read PFD. 

CONVPF: PFDUMP OR CONVPF REQUEST - GO OR DROP 
OPERATOR: n.GO. Or, 

OPERATOR: n.DROP. 

At this point CONVPF is requesting permission to read RBTC. 

CONVPF: PFDUMP OR CONVPF REQUEST - GO OR DROP 
OPERATOR: n.GO. Or, 

OPERATOR: n.DROP. 

At this point CONVPF is requesting permission to read PFD device 

label. 

CONVPF: REWRITING PFD DEVICE LABEL - GO OR DROP 

OPERATOR: n.GO. Or, 

OPERATOR: n.DROP. 

At this point CONVPF is requesting permission to rewrite PFD 
device label. A GO. response will prohibit any further 
permanent file activity under SCOPE 3.3. 

CONVPF: DEADSTART (NORMAL) 3.4 1 .L, 2. A, 3.1, 4.C 

This message informs operator of how he is to do a normal 
deadstart of SCOPE 3.4. 

WARNING: 

CONVPF will not stop flashing a question until a valid response is 
entered. 

CONVPF can be called only through DIS or by the operator. 

CONVPF can be dropped and restarted anytime before the the label is 
rewritten. 

Execution of the CONVPF utility - SCOPE 3.4 

Step 1. Idle running system. 

Step 2. Type in n.X CONVPF. 

Step 3. Communicate with CONVPF utility as in SCOPE 3.3. 
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greater than the CMR value of N^SD inlcSS 3!!! ln 3 " 3 1S ° ne 

The last message by CONVPF is the following: 

DEADSTART (NORMAL) 1 .N, 2.A, 3.Y 
SCOPE 3.4 CONVPF messages in order of occurence: 

1. NUMBER (OCTAL) OF SUBDIRECTORIES IN 3.4 - GO OR CFO 

2. mB SUBDIRECTORIES - GO OR DROP 

3. NUMBER (OCTAL) OF ENTRIES PER SUBDIRECTORY IN SCOPE 3.4 - GO OR CFO 

4. mB ENTRIES PER SUBDIRECTORY - GO OR DROP 

5. NUMBER (OCTAL) OF PRUS/20B IN 3.4 RBTC - GO OR CFO 

6. mB PRUS/20B IN RBTC - GO OR DROP 

7. CONVPF FIELD LENGTH (OCTAL THOUSANDS) , DEFAULT IS 50R - m nn nvrs 
8.. mOOO FIELD LENGTH - GO OR DROP J~AJ*,T xS 50o w OR CFO 

9. PFDUMP OR CONVPF REQUEST - GO OR DROP 

10. PFDUMP OR CONVPF REQUEST - GO OR DROP 

1 1 . PFDUMP OR CONVPF REQUEST - GO OR DROP 

12. REWRITING PFD DEVICE LABEL - GO OR DROP 

13. DEADSTART (NORMAL) 3.3 1.N, 2. A, 3.Y 

EARNING: 

f^fw * file „ na ? eS are qualified by the ID in SCOPE 3.4 but not in SCOPE 
lo scopf iT; dupllc * te . Permanent file names could exist after a SCOPE 3.4 
under SCOpI-IJ?^" 11611 ' ^ C °^ ersion - ^ome files could become inaccessible 

Cycle numbers can be no larger than 999D in SCOPE 3.4; however, SCOPE 3 3 onlv 
supports cycle numbers less than 64. Therefore, PermanenT liief with c?cle 
numbers greater than 63 sould not be used in SCOPE 3.3. 

!£££*?* P^manent files are not supported under SCOPE 3.3; therefore, under 
SCOPE 3.3 converted SCOPE 3.4 archived files will appear as vacuous files. 

rpcXT S ^ n *° f ? C0] c E 3 ' 4 P erraanent files to SCOPE 3.3 permanent file will 

result in t-ho -Fr>T-ma+- nf +-K~ — -l- n -• ■■ - • - - - - xi 

K1 • \ ~\~ —;~ — — - ^x. ux iC jt/ejLuiauent iiie z.a.Dxes introduced by PSR SC31480 
s^tef without ScauinSLlled.- ThlS f0rBat " ™ tible wit » * scow 3.3 

If e Rmc r » t ri« , !^ i0n ° f ST^ 3 / 4 ^° SC0PE 3 ' 3 alwa * s wil1 increase the size 
of RBTC entries as compared to the size of SCOPE 3.3 RBTC entries that were 

ROTC ££™"r * resu " of a ** conversion. The amount of space used in the 
kbtc tafcle may or may not increase over the original SCOPE 3.3 syst. 



:em. 



If + ^ hS ™ rman ! nt -, fi J e ID hashin 9 scheme has been modified in SCOPE 3.4, the 
routine HSH must also be modified appropriately. 

nn r q?oPTr S ?°a E ll 3 no ^ mal . d eadstart process after a successful CONVPF execution 
PFD devices?' follOWlng message may be issued to the display for the non- 

CHECKSUM ERROR ON LABEL - RB nnnn 
The correct operator response is NEW. 
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CONVPF ERROR MESSAGES AND RECOMMENDED 
INSUFFICIENT FL AT 1031 



WRITE ERROR AT nnnn 

where nnnn is statement number 



READ ERROR AT nnnn 

where nnnn is statement number 

PFD DEVICE OVERFLOW AT 14 3 



END-OF-RECORD IN SUBDIRECTORY FILE 



PARTIAL ENTRY IN SUBDIRECTORY 

PFD OVERFLOW AT 11 TP33 
PFD OVERFLOW AT 11 TP34 

BAD 1ST RBT ORD AT 51 TP33 
BAD 1ST RBT ORD AT 41 TP34 

BAD RBT ORD AT 55 TP33 
BAD RBT ORD AT 42 TP34 

RBTC OVERFLOW AT 59 TP33 
RBTC OVERFLOW AT 50 TP34 
RBTC OVERFLOW AT 108 TR34 
RBTC OVERFLOW AT 51 WRA 



OPERATOR ACTION 

Rerun CONVPF with larger field length 
specified. 

Dump CONVPF field length and call 
system analyst. Dump high and low core 
of CM also. 

Same as above.' 



Release disk space on PFD device and 
rerun CONVPF i.e. do DUMPF(MO=2) on PFD 
device . 

Dump high and low core in CM. Dump 
CONVPF field length and call system 
analyst. 

Same as above. 

PFD specification for target CMR is too 
small. Consult system analyst. 

Same as above. 



Same as above. 

Rerun CONVPF with larger RBTC size 
specified. 
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FORTRAN EXTENDED VERSION 4.0 



RELEASE DESCRIPTION 

FORTRAN Extended Version 4.0 provides many new capabilities. It operates 
under the SCOPE 3.4 operating system and requires the same minimum hardware 
configuration as SCOPE. 

RELEASE MATERIALS 

FORTRAN Extended 4.0 is released on two reels of tape: PL7 contains the 
FORTRAN Extended 4.0 compiler; PL8 contains the FTN 4.0 object library. This 
object library is used also by 7000 SCOPE 2.0, FORTRAN Extended 2.0, and RUN 
FORTRAN 2.0 programs. 

MODIFICATIONS 

Major improvements include the following: 

1. IMPLICIT Statement 

type LOGICAL, INTEGER, REAL, COMPLEX, DOUBLE PRECISION 

range r1,r2,...rm 

ri letter or letter- letter 

2. LEVEL Statement 



n 6000 7000 

1 Central Memory SCM 

2 Central Memory LCM (Direct Access) 

3 ECS (Block Copy) LCM (Elock Copy) 

List List of variable/array names separated by commas 
3. Quote Delimited Strings 

Version 4.0 extends the usage of the quote delimited string to any context 
where a Hollerith expression is allowed. 
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4. Expressions in Output Lists 

Items which may occur in an output list have been expanded to permit 
Hollerith strings as well as any expression. 

PRINT 23,#X=*,Y*Y+Z*Z 

5. STORES Statement Extension 

C$ STORES (variablel. operator. variable2) 

6. Syntax Scan only Compiler Mode 

FTN(Q) , the program is scanned for syntax errors, and a reference map is 
produced. 

7. Line Limit on Output File 

OUTPUT file line control is provided by PL option on the control card. 

FTN(R=3,OPT=2,PL=1000) 
Also may be specified at object time. 

LGO(PL=7000) 

8. Multiple Systems Texts 

Multiple systems texts may be specified on the FTN control card as: 
FTN (S=IOTEXT,S=NUCLEUS/FTNMAC) 

9. System Text Specification from a File 

System texts may be specified on the FTN control card to be loaded from a 
local binary file as: 

FTN (GT=MYTEXT,GT=TXTFILE/NEWTXT) 

10. Exclusive OR Function 

A=XOR (STRING, MASK) 

11. Reference Map with Suppressed Program Listing 

Any of the reference map options may be selected with the program listing 
suppressed, for example: 

FTN(L=0,R=3) 

12. Mass Storage Rewrite in Place 

User may rewrite in place rather than at end-of-inf ormation. 



1-9-2 60307400 A 



13. Messages on STOP and PAUSE Statements 

STOP PAUSE 

STOP n PAUSE n 

STOP#string# PAUSE*string# 



n 



octal number (up to five characters) , #string# up to 70-character 
message 



14. External text (XTEXT) Specification 

An external text may be specified on the FTN control card as: 
FTN (XT=TXTNAME) 

15. MOVLEV Library Subroutine 

CALL MOVLEV (from, to r n) 
n=number of words 

16. Integer Multiply Installation Option 

CORRECTIONS 

All eligible Programming System Report corrective code through Summary 312 is 
incorporated in the release program libraries. 

LIMITATIONS 

When the debugging compilation mode (control card' parameter D) and the full 
cross reference features (R=2 or R=3) are used, more core may be required for 
compilation than otherwise. Detailed information is contained in the FORTRAN 
Extended Version 4.0 Reference Manual. 

The intrinsic function SHIFT will not accept double word arguments (double 
precision or complex words) . 

FORTRAN Extended is designed to produce efficient object code. The rate of 
compilation tends to be higher on program units which avoid lengthy sequences 
of complicated arithmetic replacement statements (such as contiguous 
statements with no branching entries or exits). However, lengthy sequences 
tend to produce faster object code. 

Code produced under the 6400 compiler option may not work properly on a 6600 
because of optimization considerations. The compiler option to produce code 
tor a 6600 produces binaries that can be run on either a 6400 or a 6600. 

When the FTN control statement specifies either the C or E option, the 
compiler generates the object program in COMPASS source language form, rather 
than binary machine language, since a local library set cannot be specified 
in a COMPASS source program, the user must place either the SCOPE control 
statement LIBRARY (FORTRAN, SYS IO) or the loader directive 
LDSET(LIB=FORTRAN/SYSIO) at appropriate points in the control card section of 
the job deck. 
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Under FTN 3.0 unformatted read and write statements processed S type records. 
Under FTN 4.0, W type records are the default style. Files of this type 
produced under 3.0 can be processed in the SCOPE 3.4 environment by using FILE 
and LDSET control cards to define the record type at object time. 

Binary blocked and/or random indexed files created under FTN 3.0 cannot be 
handled directly by FTN 4.0: they must be converted to a file structure 
accepted by FTN 4.0 through use of the Conversion Aid utilities BBT06RM and/or 
RANCCNV. 
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INSTALLATION PARAMETERS 

The amount of core needed to compile jobs can be altered by modifying the size 
of compiler tables and scratch file buffers. Parameters which modify table 
sizes are included in the options listed at the end of this section. File 
buffer sizes can be changed by modifying the controlling routine FTN. FTN is 
the main overlay of the compiler (level 0,0) . 

System compatibility parameters provide the following features. At the time 
of release, these parameters are set as listed below: UPDATE sequence numbers 
for all installation parameters may be determined by listing the OPTIONS 
portion of routine FTNTEXT and listing the routine FTN from release tape PL7. 



Parameter 
Names 



Release Setting 



CCABT 
CTIMO 



Abort job on FTN control card error 

Compiler message issued to control 
point dayfile (CPU seconds necessary 
for compilation) 



Abort 

Time message 
sent 



LMAX 



Lines per page listing limit (not 
applicable to intermixed COMPASS 
programs) 



57 



File names used by compiler: 



INPUT 

OUTPUT 

LGO 

COMPS 

ZZZZZRL 

ZZZZZRM 

ZZZZZOP 



Source input 

Compiler listing 

Relocatable object code 

COMPASS card images 

Intermediate language 

Reference map 

OPT=2 and D mode scratch 



60307400 A 



1-9-5 



If the following control card options are not specified, the default settings 
at the time of release are as shown: 



Control 
Card Option 



G 
I = lfn 

list = lfn 



Usage 

Abort to EXIT(S) card if fatal compilation 
error occurs 

Produce object code file 



Use COMPASS assembler for compiler 
generated code. If C is not selected, 
the FORTRAN assembler is used. (FORTRAN 
assembler saves about 60% of CPU time 
compared with COMPASS assembler.) 

Debug mode of compilation 

Format file for editing (COMPASS card 
image file is produced with *EECK 
cards for each program unit, suitable 
as input for UPDATE) 

Compile and go option 

Select compiler input file 

I Not Specified 

I Specified without lfn 

Select compiler listing file and 
listing options as follows: 

L List source code 
O List COMPASS card images 
X List ANSI violation diagnostics 
N Suppress informative diagnostics 
R (equivalent to long reference map 
option R=2) 

The P option may be used as a stand 
alone option of the form R = n if a 
reference level other than the default 
is required. The values for n select 
the following reference map options: 

no reference map 

1 short reference map 

2 full cross reference map 

3 full cross reference map plus 
common and equivalence 
information 



Release 
Setting 

No abort 



Produces object code 
on standard file 
(LGC) 

C is not set 



No debug mode 

No file for editing 

No compile and go 



lfn = INPUT 
lfn = COMPILE 

lfn=OUTPUT 
list=L 

L 

No list 
No list 
No list 
No list 
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Control 
Card Option 



Usage 



Release 
Setting 



OPT=level 



Q 
Round =s 

SYSEDIT=ss 



v 



GT 



PL 



XT 



Select level of optimization: 

Lowest optimization 

1 Slightly above FORTRAN Extended 2.0 
optimization 

2 Program unit flow analysis used in 
optimization 

Program verification option 

s = */+- select 1-4 of these operators 
to round arithmetic 

This feature is intended for system 
programmer usage: 

ss=FILES Form execution time input/output 
unit references through indirect search of 
low core table rather than by using entry 
points and external references. 

Maximum error checking in mathematical 
library routines (basic external functions) 

Selects minimal input/output buffer 
allocation (513 words per buffer) for 
compiler buffers during compilation. 
This may increase compile time but wilj. 
allow jobs with a large number of 
declarative statements to compile in 
smaller field length than would 
be possible otherwise. 

Specifies system text files (global 
library set) to be used for intermixed 
COMPASS programs. 

Specifies system text files (sequential 
binary file) to be used for intermixed 
COMPASS programs. 

Forces all subroutine calls with no 
parameters to pass a parameter list 
consisting of a zero word. 

Selects maximum number of allowable 
records on the OUTPUT file. 

Specifies external text (XTEXT) to be used 
for intermixed COMPASS programs. 



OPT=1 



Q is not set 
No roundina 



None 



No error checking 



XT specified without lfn 
A listing of the Options portion of FTN follows: 



SYSTEXT 



SYSTEXT 



None 



5000 



OLDPL 



OPL 
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^ FTN - 0.0 OVERLAY , INITIALIZATION AND I/O CONTROL COMPASS 3.72090 08/23/72 05.06.21. 

^, OFTIONS- FORTRAN EXT INSTALLATION PARAMETERS OFTIONS 



PAGE 






F603250 2 

OPTIONS- FORTRAN EXTENDED INSTALLATION PARAMETERS. F600250 3 

FC03250 <t 

F600250 £ 

THE PARAMETERS DEFINED IK THIS DECK DETERMINE THE SPECIFIC F600250 6 

CONFIGURATION OF THE FORTRAN EXTENDEO COMFILER. WHEN INSTAL- FE00250 7 

LING THE COMPILER, PARAMETERS SHOULD EE REVISED AS NECESSARY F600250 8 

TO OESCRIBE THE INSTALLATICNtS EXACT HARDWARE CONFIGURATION F600230 <= 

AND SPECIFIC FUNCTIONAL RETIREMENTS. F6002SO 10 

F600250 11 

ADDITIONAL INSTALLATION CFTION. PARAMETERS WILL BE FOUND IN FE00250 12 

THE PROGRAM DECK < FTN > . F60U250 13 



* INSTALLATION WARNING NOTICE * 



AN ASTERISKED BOX SIMILAR TO THIS ENCLOSES EACH 
PARAMETER THAT IS INTENDED TO BE CHANGED WHEN 
INSTALLING THE FORTRAN EXTENDED COMPILER. 

NO OTHER PARAMETER IN THE *OPTICNS* DECK SHOULD 
BE CHANGED. 

CONTROL DATA CORPORATION ACCEPTS NO RESPONSIBILITY 
FOR SATISFACTORY PERFORMANCE OF THE FORTRAN 
EXTENDED COMPILER IF THIS NOTICE IS DISREGARDED. 



IF******************************************** 



******«««***«*«** 



>*» FROCESSOR NAME AND VERSION NUMBER 

LPNAME MICRO 1,7, /FTN / LANGUAGE PROCESSOR NAME 
VER MICRO i,3,M.0/ 



FEQ025Q 


15 


F603250 


16 


F6002i/0 


17 


FC00250 


18 


F600250 


15 


F6002SO 


20 


Fe00250 


21 


F600250 


22 


F600250 


23 


F600250 


24 


F6Q021-0 


25 


F6002E0 


26 


FC00250 


27 


F6002Ej0 


28 


F600250 


25 


F600250 


30 


F€002E>0 


31 


Feoa2go 


32 


F6002E0 


33 


Fe00307 


2 


F600307 


k 


F600307 


= 



o 

o 
-J 

-tr 

o 
o 

> 
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g OFTICNS- FORTRAN EXT INSTALLATION PARAMETERS OPTIONS ./.uo.oa. r H *e s 

.pr »*» CENTRAL PROCESSOR MODEL / SERIES DECL A P ATICNS. F60Q250 35 

g F60025Q 36 

F60Q250 37 

^, * **»»****»****»»***«**«**«««##¥#¥»*¥*«#«#*»»#**«**«*j¥«**«*«*«««i F6Q025Q 38 

* * * F603250 39 

* * TO INSTALL FOR1RAN EXTENDED ON A CYBER 70/ MOOEL XX * F600250 <*0 

* * PROCESSOR, SET THE FOLLOWING SYMBOL TO THE APPRO- * F6Q325Q kl 

* * PRIATE MODEL NUMBER, AND DELETE THE SUBSEQUENT * F6Q0250 kl 

* * SYMEOL t MACHINE. ]. * F60Q25Q kZ 

* * « F60025Q kk 
7k CYBERMOO EQU 7kB CYBER 70/ MODEL NUMBER F600250 45 

* * ■ * F60025Q 46 

* * REFERENCES -- FTN, FTNTEXT. ♦ F60Q250 47 

* **♦******»«»♦»**♦*•»****«***•»**♦♦*♦***#*«»«♦«»»***»♦*♦***#,*, F6Q0250 4 8 

* 4MF ************ ***:»* *****«**♦*»**»**♦*»*♦♦*»*»♦#.<>»*♦♦ *#*****«*«i 

* * » 
» ■ * TO INSTALL FORTRAN EXTENDED ON A 6X00 / 7X00 » 

* * PROCESSOR, SET THE FOLLOWING SYMBOL TO THE APPRO- * 

* * PRIATE SERIES NUMBER, AND DELETE THE PRECEDING » 

* * SYMBOL C CYBERfOD ]. * 

6600 MACHINE. EQU 6600B 6XQ0 / 7X00 SERIES NUMBER 

* * REFERENCES -- FAX, FTN, FTN.1AC, OPTB, REFMAP. * 



F6Q0250 


50 


F6QQ250 


51 


F60025Q 


52 


F60Q250 


53 


F600250 


54 


F600250 


55 


F603250 


56 


F60Q25Q 


57 


F600250 


58 


F6QQ250 


59 


F60325Q 


6 



C 


IF 


DEF,CYBERMOD 




IFLT 


CYBERM0D,74B,2 




IFEQ 


CYBERM0O,74B,2 


MACHINE. 


EQU 


6600B 


S 


SKIP 




S 


ENDIF 





66 



* [MACHINE.] REFERENCES -- FAX, FTN, FTNMAC, OPTB, REFMAP. 

6600 MACHINE EQU MACHINE. FORMER NAME CF SYMECL 

TARGET OCTMIC MACHINE. 

VHCJV 1JBFC 2/3/Rs'CIH lil=R 

** DEFINE *MOOEL* MICRO. 

MODEL OCTMIC CYBERMOD 

* t*MODEL#] REFERENCES -- FTN, FTNTEXT. 



F60025Q 


62 


F600250 


63 


F600250 


66 


F600250 


67 


F600250 


68 


F600250 


79 


F60a250 


80 


F600250 


31 


F6Q0250 


82 


F600250 


83 


F600307 


7 


I71141J 






F600250 


85 


F60J250 


86 


F600250 


87 


F600250 


88 


F60J250 


89 



H 
I 
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1 OPTIONS- FORTRAN EXT INSTALLATION PARAMETERS OPTIONS 

• * ♦♦###♦♦**♦,**#♦***»»♦#**«#«»♦♦»*♦»♦**»*♦♦♦*»*♦»**♦»*»**»»**»»* F6OO250 91 

o * ♦ * F600250 92 

* * EARLY MODEL 6600 PARAMETER (STORE OUT OF OROER) . * F600250 93 

* * * F60025Q 94 

* ♦ WHEN THE TARGET, I.E., OBJECT TIME, CPU IS A 6600 * F60025Q 95 

* * CLASS A, B OR C MACHINE, SERIAL NUMBER lf*47, THAT " F6Q0250 96 

* * LACKS FCO 20436, SET THE FOLLOWING PARAMETER TO ZERO. * F600250 97 

* * (FCO 20436 RESCLVES A STORE OUT OF OROER PROBLEM.) * F6Q0250 98 
» » * F60025Q 99 



STOR6600 EQU 



F60Q250 100 



* F603250 101 

♦ REFERENCES — OPTE. * F6QQ250 102 

*****♦♦***»**♦»**♦»«*»»*♦**»♦*»¥***♦»*»*»•***♦*♦**♦»*»***«»♦*» F6 00250 103 



*********♦»*»#»#»**»*«**««*****»*»»»»«*»*»♦*♦*»**»♦»*»♦»»*»*** F600250 10S 

* * F60025Q 106 
' ♦ HARDWARE INTEGER hLLTIPLY FEATURE. VALUES ARE — * F603250 107 

* * F6Q025Q 108 

* 1 = INTEGER MULTIPLY INSTALLED. * F6Q0250 109 
^ * = INTEGER MULTIPLY NOT INSTALLED. * F60025Q 110 
f « * F600250 111 
h ♦»»*♦♦♦*♦♦»*»******»*«*»«*«**♦***»»***««*♦***»♦**»»**♦♦»»***** F600250 112 
,. * * F600250 113 

* * [CPTIMULTJ - DEFINE AVAILABILITY AT COMPILE TIME. * F600250 114 
f , * F60025Q 115 

CPTIMULT EQU INTEGER MULTIPLY NOT AVAIL AT COMPILE TIME F600250 116 

t * * F600250 117 

" ♦ REFERENCES — FTNTEXT. * F600250 118 

, # »,»**«**»,***»»»*#«^«*»«»*»*»»**#»»*»***»***»***»*»*»»»*«*»** F60025Q 119 

f # * F600250 120 

► ♦ COBJIMULT] - DEFINE AVAILABILITY AT OBJECT TIME. * F6Q3250 121 
, « * F600250 122 

OBJIMULT EQU INTEGER MULTIPLY NOT AVAIL AT OBJECT TIME F600250 123 

► * * F600250 124 

* » REFERENCES — ARITH, OOPRE, MACROX, MACRS. * F600266 1 
, »»»»»,«»«*MmM((*M***»u«*»*M*#i»*»»M»m*MM»«tm»» F600250 126 



'» 70M tDATA MANAGER) A FPL IC AEILIT Y. DENOTES WHETHER OR NOT 70M 

WILL EE USED, BASED ON THE PROCESSOR PCDEL. SINCE THE SYMEOL 
IS MORE CONVENIENT IN A NEGATIVE SENSE, IT IS DEFINED AS — 

I 

■> 70M DOES NOT AFPLY (MODEL 74 OR LOWER / 6X00 SERIES). 

7DM APPLIES (MCDEL 75 OR HIGHER / 7X00 SERIES). 

IFC GE, *MOOEL* 75 , 3 

N=DM EQU 1 



F6Q0250 


141 


F600250 


142 


F600250 


143 


F600250 


14 4 


F600250 


143 


F600250 


146 


F600250 


147 


F60025Q 


148 


F600250 


152 



o 
u> 
o 
-J 
-tr 
o 
o 



CTl 
O 
OJ 

o 
■^1 
J= 
o 
o 

> 



FTN - 0.0 OVERLAY , INITIALIZATION AND I/O CONTROL 
OPTIONS - FORTRAN EXT INSTALLATION PARAMETERS 



MODEL 


IPC 


LT 


CPERM 


EQU 





MOOEL 


ENOIF 





COMPASS 3.72090 
OPTIONS 

t MODEL* 75 

DO NOT ASSEMBLE 6RM 



08/23/72 05.06.31. 



PAGE 



F600250 
F6Q025Q 
F60Q2S0 



165 

168 



PLCMPS 



♦***♦»****»♦*****♦♦»♦♦»♦«*»***♦«»♦♦♦**»***♦»»»♦♦»*»«*♦*»««*♦*» F6002&0 17 

* FILE CONTAINING CCKPASS RANDOM FL WITH /COMPCOM/. * F6002&G 171 

* * F600250 172 
MICRO 1,, COMPCOM F600270 1 

* * F600250 174 
♦»M*«w»*»t***»t»t»*iit»M«»*»»*»fw»»»«*»»*«»»»t*t»*»»*«*»» F6Q0 25 175 



PLRM 
PLRM 



IFNE 
ENDIF 



CP=RM*N=DM,0 



F60iJ25Q 
F600250 



177 

185 



*********************** #«*^«* ***************** *************** F600250 187 

* * F600250 168 

* CHARACTER APPENDEC TO FILE NAMES FOR UNIQUENESS. * F60025Q 189 

* * F6QQ250 190 
MICRO 1,,/=/ F6002&0 191 

* * F600250 192 

* REFERENCES — eUGCTL,D8GFET,FT NMAC,LISTIO,PHlCTL. * F60025Q 193 
****************** ******«««********4^ *««***««******* ********** F6Q0 25Q 19 *» 



H 

I 
VQ 

I 
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^ OPTIONS- FORTRAN EXT INSTALLATION PARAMETERS OPTIONS 
I 

■"* * ****»♦**♦♦*****»♦**«♦#*#»««*♦**»**♦♦*»»**¥***«**♦*#**♦♦**■¥♦♦♦* F6002S0 196 

M * * * F6Q3250 197 

* * FIXED LENGTH TABLES. * F600250 198 

* * * F600250 195 

* ******4mf****************««*****«****«*«**#*«****************** F600250 200 

* » * F6Q0250 201 

* * LENGTH OF INTERMEDIATE STORAGE AREA FOR ALL CON- * F600250 202 

* * STANTS IN ANY ONE SOURCE STATEMENT. EACH CONSTANT * F600250 203 

* * BEGINS ON A NEK WORD BOUNDARY, AND IS PACKEO AS TEN * F600250 204 

* * DISPLAY-CODED CHARACTERS PER WORD. * F603250 20S 

* * * F6Q3250 206 
kik CONSTORS EQU 300D F6Q025Q 207 

* * * F6032ii0 208 

* * REFERENCES -- SCANNER. * F6Q0250 205 

* *****«***««**«**«****«*«**«***«*««¥*«*««««***4***«*«****«****« F600250 210 

* * * F600250 211 

* * LENGTH OF SAVED OFERATOR STACK. * F6Q3250 212 

* * * F603250 213 
240 MXOSE EQU 160D F6.03250 214 

* * * F600250 21S 

* * REFERENCES -- ARITH. * Ffc0325Q 21c 

* v********************^**^*************^*********************** F6O0250 217 

* * * F6Q0250 218 

* * LENGTH OF SAVED FUNCTION RESULT TABLE. * F600250 219 

* * * F603250 220 
132 MXFRSTE EQU 900 F6Q3250 221 

* * * F60025Q 222 

* » ■ ■ REFERENCES — ARITH. * F603250 223 

* **«*********«****r*«****«**«**»*****¥«*******^*¥«*v*«***«***« F£0J2£0 224 

* * * F6002E0 225 

* * LENGTH OF <ARLIST> EUFFER. * F6002150 226 

* * - * F603250 227 
3200 ARLSZ EQU 3200B F600250 228 

* * * F6002&0 229 

* * REFERENCES — FS1CTL. ♦ F600250 230 

* ************«#**«***««*«*«««**«**««***«****«*«***«««**«**««*«« F60325Q 231 

* **********-******'*****«******«**********************«*******«** F60J250 233 

* * * F6002&0 234 

* * SELECT DIVISION BY RECIPROCAL MULTIPLICATION. * F6002&0 233 

* * * Fe0025Q 236 

* * WHEN THE FOLLCWING PARAMETER IS ZERO, <ARITH> WILL * F6Q0250 237 

* * ATTEMPT TO REPLACE X/C BY X*(l/C), WhERE C X J IS AN * F6002b0 238 

* '" " * EXPRESSION AND CC1 IS A CONSTANT (REDUCTION IN * F600250 23 = 

* * STRENGTH). SET NON-ZERO TO DEFEAT THE FEATURE. * FE0025Q 2*0 

* ■ * # F600250 241 
NOINVERT EQU F600250 242 

* * » F600250 2^3 
™ * * REFERENCES -- ARITh. * F6002SO 244 
O * *»*«*♦*»»*****»****»***«**«**¥*«**«*#»*#♦##**#*«.**»«»«»»»»»«,, F6Q0250 245 

O 
-J 
-t= 
o 
o 

> 



O 

U) 

o 
-J 

O 

o 

> 
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1<«<* 



ERRMAX 



* ERROR LISTING LINE LIMIT. « 
EQU 100D 

* REFERENCES -- ERPfiO, LSTPRO. * 



PAGE 



F60Q250 
F60025G 
F600250 
F6O0250 
F6O0250 
F60Q25Q 
F600250 
F600250 
F6Q0250 
F60025Q 
F6Q0250 



2^7 

2*»8 

2<*g 

25 
251 
252 

253 
25*» 
255 
256 
257 



MICROS TO DEFINE THE OEFALLT CONTROL CARD OPTIONS. 



OPTIONS SELECTED 



CCA 


MICRO 


1»» 


A 


i 


♦ CHANGE 


♦ IGO* MICRO BELOW 


E = LFN 


ALWAYS 


CC.G 


MICRO 


l»t 


G 


-1 


CC.C 


MICRO 


ltf 


C 


-1 


CC.O 


MICRO 





D 


NA 


CC.E 


MICRO 


ltf o 


E 


-1 


CC.GT 


MICRO 


1, f SSYSTEXTS 


GT=LFN 


ALWAYS 


* CHANGE 


♦COMPS* 


MICRO BELOW 


E = LFN 


ALWAYS 


* CHANGE 


tINPUTt 


MICRO BELOW 


I = LFN 


ALWAYS 


CCI 


MICRO 


lf,$COMPILIE$ 


I 




CC.L 


MICRO 


Iff 1 


L 


1 


CC . LC M 


MICRO 


l»f o 


LCM 


-1 


CC.O 


MICRO 


Iff o 


O 


-1 


CC.X 


MICRO 


Iff 


X 


-i 


CC.N 


MICRO 


Iff o 


N 


-1 


* CHANGE 


♦OUTPUT 


* MICRO BELOW 


l = LFN 


ALWAYS 


CC.PL 


MICRO 


Iff 5000 


FL = N 


N 


CC.Q 


MICRO 


Iff o 


G 


-1 


CC.R 


MICRO 


Iff 1 


R = 


Of if 2f 


CCS 


MICRO 


If f SSYSTEXTS 


S = LFN 


ALWAYS 


CCT 


MICRO 


Iff 


T 


-1 


CCXT 


MICRO 


l»,$OPLS 


XT 




CCZ 


MICRO 


Iff 


Z 


-1 


CCOPT 


MICRO 


iff 1 


CPT = 


0, 1, OR 


CC. ROUND 

* 


MICRO 


iff 6S37 


ROUNC= 


IB FOR ♦ 
28 FOR - 
<tB FOR * 


* 






10B FOR / 


CCIDENT 

* 


MICRO 


iff 


SYSECI1 


■ = IDENT 

-1 

=FILES 




CCFILES 

* 


MICRO 


ltf 1 


SYSECI1 




IFC 


EQ»/*CC.OFT*/0/»1 



CR 3 



NOT SELECTEO 



NA 









NA 

NA 

NA 











NA 

5000 

(I 

NA 

NA 



NA 





F600250 


1162 




F603131 


15<« 


FILE 


F600131 


153 


NA 


FE20005 


1 


LFN 


F600131 


157 


NA 


Fe00131 


158 


NA 


F600131 


159 


LFN 


F600131 


16C 




FCO0131 


161 


LFN 


F60325Q 


1163 


LFN 


F600131 


162 


LFN 


F600131 


163 




F600261 


1 


NA 


F600250 


116i( 


NA 


F60Q162 


1 


NA 


F60Q131 


165 


NA 


F600131 


166 


NA 


F600131 


167 


LFN 


Feooi3i 


16 8 


NA 


F600215 


1 


NA 


F600158 


1 


NA 


F600131 


165 


LFN 


F600131 


170 


NA 


F60Q131 


171 




F600296 


1 


NA 


FC00159 


4 


NA 


F600131 


172 


NA 


F60Q131 


173 


NA 


F6Q0131 


17<» 


NA 


F600131 


175 


NA 


F603131 


176 




F600131 


177 


NA 


F6Q0131 


178 




F60Q138 


7 


NA 


F600138 


8 




FE200<»1 


1 



H 
I 

I 



H 
I 
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PAGE 



10 



71 
1 



CCABT 

v 

EM 
EM 

LMAX 

PSR 

CTIMO 



PSR 



ASSEMBLY OPTIONS 





IFEQ 


TEST,0 




RMT 




W=SBW 


EQU 


CCERR 


M=LFN 


EQU 
RMT 
ENOIF 


CCERR 



MSPY BIN WIDTH 
MACROX PATCH FACILITY 



LOCAL ASSEMBLY OPTIONS REFERENCED ONLY IN *FTN* 
EQU 1 



IFNE CP=RM,0 
ENOIF 

EQU 57D 

MICRO i,4,/P213/ 

EQU 1 



MICRO i,4,/P310/ 



SET TO NON ZERO VALUE FOR ABORT CM 
CONTROL CA30 ERRORS 



LINES / PAGE 

FSR LEVEL OF THE COMPILER 

= NO MESSAGE 

=1 ISSUE DAYFILE MESSAGE FOR CPU 
FSR LEVEL 



FTN 


59 


FTN 


60 


FTN 


61 


FTN 


62 


FTN 


63 


FTN 


64 


FTN 


65 


FTN 


67 


FTN 


71 


FTN 


72 


FTN 


73 


F600138 


c 


F600138 


10 


F600138 


11 


FTN 


75 


FTN 


76 


F60025Q 


1165 


F60Q250 


1169 


F6QQ25Q 


117 


FTN 


77 


F600131 


181 


F60024Q 


1 


F6Q0131 


184 


F600131 


183 


TITLE 


1 



CDC6466 QCTMIC MACHINE. 



o 

U) 

o 

4=- 

o 
o 

> 



K 

TV 

TVS 



42000 


MIN.FL 


6100C 


MIN.OFL 




, MIN.FL 




MIN.FL 




MIN.OFL 




MIN.OFL 



MICRO 1,,/BS9/ 
MICRO l,,»l/2* 
EQU 1 



MACHINE THAT CODE IS GENERATED FCR 

•1000B 

TRIGGER VALUE 
LOG2( 1/TV ) 



MIN.FL, MIN.DFL = MINIMUM FIELD LENGTH TO EXECUTE IN. 

MIN.FL = MAX(LWA LOAD) +40 0E+ 100 0B ROUNCED UF TO NEXT 1000E 

WHERE » 
MAXCLWA LOAD) = LAST WORD ADDR. OF THE OVERLAY LOADS 
400B IS FOR MINIMUM RLIST AND COMPS 5LFFERS 
1000B IS FOR WORKING STCRAGE 

CURRENTLY FASS 1 ( THE 1.1 OVERLAY ) IS THE LARGEST 

FOR FL > MIN.FL+3K STANOARD SIZE BUFFERS (L .RLIST, L. COMPS) 
ARE ALLOCATED FOR RLIST AND COMPS. 

EQU 42*K*+TEST*2Q008 MINIMUM FL FOR EXECUTION 

EQU MIN.FL+17#K* MINIMUM Ft IF OPTICN SELECTED 

OCTMIC MIN.FL 

MICRO 1,2,/*MIN.FL#/ 

OCTMIC MIN.DFL 

MICRO i,2,/*MIN.DFL*/ 



DEFAULT FILE NAMES 



F600131 


188 


FTN 


82 


FTN 


85 


FTN 


86 


FTN 


87 


F600077 


2 


F600077 


3 


F600077 


4 


F600077 


c 


F600077 


e 


F600077 


7 


F600077 


8 


F600077 


c 


F600Q77 


10 


F600077 


12 


F6Q3077 


13 


F600C77 


14 


F600077 


15 


F600322 


1 


F60Q077 


17 


F600077 


18 


F600077 


19 


F600077 


20 


F6 0'0-77 


21 


F600077 


22 



FTN 



94 



0"i 

o 

o 
-J 

o 
o 

> 



FTN 



0.0 OVERLAY . 
ASSEMBLY OPT 



INITIALIZATION AND I/O CONTROL 
IONS 



OUTPUT 


ruuKU 
MICRO 


1 
it 


, &I INPUTS> 
,SOUTPUT$ 


LGO 


MICRO 


li 


, SLGOS 


COMPS 


MICRO 


1, 


,$COMPSS 


RLIST 


MICRO 


i, 


,$ZZZZZRL$ 


RMAP 


MICRO 


1, 


,SZZZZZRMi 


OPT 


MICRO 


1, 


,$z:zzzzop$ 




IFNE 


TEST, 0,3 



COMPASS 3.72093 
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EINARY FILE NAME 

CCMFASS IMAGES 

INTERMEDIATE CODE SCRATCH FILE 

REFERENCE MAP SCRATCH FILE 

SLPER MODE SCRATCH FILE 



PAGE 



FTN 

FTN 

FTN 

FTN 

FTN 

F600172 

FC03172 

F600172 

F603172 



11 



95 
96 
97 
98 
99 
2C 
21 
22 
23 



BUFL 



DEFAULT BUFFER SIZES 
MAY BE ADJUSTED BY FTN, DEPENDING ON FIELD LENGTH AND 
CONTROL CARI] OPTIONS 



MICRO 1,, KJ02B MIMMLM BUFFER SIZE 







RMT 






L. INPUT 


EQU 


IBUFL 




L. OUTPUT 


EQU 
RMT 


OBUFL 


1002 


L. COMPS 


EQU 


*BUFL* 


200*4 


L.LGO 


EQU 


*BUFL*»2 


2004 


L.OPT 


EQU 


*BUFL*»2 


2004 


L. RLIST 


EQU 


*BUFL#*2 


1002 


L.RMAP 


EQU 


*BUFL# 



COMPASS SOURCE IMAGE BUFFER LENGTH 
BINARY CUTPUT BUFFER LENGTH 

MAX OFT (0PT=2) SCRATCH FILE BUFFER LENGTH 
INTERMED LANG (R-LIST) FILE BUFFER LENGTH 
LONG REFERENCE MAP (R=3) BUFFER LENGTH 

THE LENGTHS OF THE *INPLT* AND *LGO* EUFFERS MUST BE 
.GT. 1000B SINCE THEY MAY EE ON TAPE. 



NOPTLVL EQU 



NUMBER OF LEVELS OF OPTIMIZATION 



FTN 


103 


FTN 


106 


FTN 


107 


FTN 


138 


F60025Q 


1173 


F600250 


1174 


F600250 


117S 


F6Q025Q 


117£ 


F600250 


1177 


F600250 


1178 


F603250 


1179 


F6002&0 


1180 


FEQ325Q 


1181 


F60325Q 


1182 


F600250 


1183 


Fe03250 


118^ 


F603250 


1185 


FTN 


ne 


FTN 


117 


FTN 


118 


FTN 


119 


FTN 


120 



H 
I 



COMPILER PROGRAM LIBRARY STRUCTURE 

When a full update is performed on PL7, eight records are produced on the 
compile file as follows: 





Contents 




Deck Names Needed to Compile 


1. 


FTNMAC 




FTNMAC 


2. 


FTNTEXT 




FTNTEXT 


3. 


Controller 


0,0) 


FTN 






1,0) 


LSTPRO.SNAP 




Pass 1 — normal I 


[1,D 


PS1CTL.PH1CTL 




Pass 2 


(1,2) 


CLOSE2.MACROX 






[1,3) 


PS2CTL 


4. 


Pass 1-1/2 


(1,5) 


PASS15.CHECK 


5. 


Pass 1 — debug 


[1,4) 


DBGPHCT. SAVREGS 


6. 


Debug COPYL deck 




FORMDBG 


7. 


RDUMP 




MACROR.RDUMPCP 


8. 


CMPAR 




CMPAR 


FTNMAC 









This routine is a text collection of the macros necessary to assemble a FTN 
compiled job using the COMPASS assembler. Assembling the FTNMAC record from 
the compile file will produce a record suitable for entering the system 
through EDITLIB. The assembled routine is in system text format and can be 
used in FTN and COMPASS assemblies through the S parameter specification. 

FTNTEXT 

This record consists of a collection of macros, micros, and symbol definitions 
which facilitate the assembly of the FTN version 4.0 compiler. Assembling the 
FTNTEXT record from the compile file will produce a record in system text 
format that will be referenced through the GT parameter for compiler 
assemblies. 



1-9-16 
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(0,0) Overlay (FTN) 

This overlay is a batch controller which accomplishes the following: 

Breaks down the parameters on the FTN control card 

Initializes the compiler to reflect compile time options 

Contains basic I/O routines and system communication routines 

Handles COMPASS-FTN communication for intermixed COMPASS language program 
units 

(1.0) Overlay (LSTPEO$) 

This overlay holds information necessary for communication between passes of 
the compiler. It contains the symbol/label table lookup routine (needed by 
pass 1, pass 1-1/2, and the assembly phase of pass 2) ; a routine to allow the 
usage of formatted I/O in the FORTRAN coded routines which are a part of the 
debug and pass 1-1/2 portions of the compiler; and a snap facility active only 
when the compiler is in test mode. 

(1.1) Overlay (PS1CTL$) 

This overlay is the first pass of the compiler under normal mode (when the 
debug mode is not selected by the D control card option) ; it handles lexical, 
syntactical and semantic analysis of a FORTRAN program unit. The FORTRAN 
program unit is translated through a lexical element language (E-list) to an 
intermediate language (R-list) . 

(1.2) Overlay (CLOSE2$) 

This overlay is the second pass of the compiler. Using the R-list generated 
by pass 1, this pass produces COMPASS instructions which are assembled 
(optionally by the COMPASS assembler at the expense of CPU time) into an 
object deck. 

(1.3) Overlay (PS2CTL) 

Overlay 1,3 %s loaded only if errors occur in the FORTRAN program. This 
overlay issues full line error messages for both fatal and informative errors. 
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(1,5) Overlay (PASS 15$) 

This overlay is selected optionally (OPT=2 on the FTN control card) ; it is 
executed between the normal pass 1 and pass 2. This pass (1-1/2) uses the R- 
list language generated by pass 1 as input and, utilizing flow analysis, 
produces a modified R-list file for input to pass 2. This file will reflect 
the movement of invariant code from frequently executed regions to those less 
frequently executed and it will allow register allocation over loops. 

(1,4) Overlay (PASS14$) 

This overlay serves the same purpose as overlay (1,1) with the addition that 
debug statements will be acted upon as specified by the D option in the FTN 
control card. On the program library, only the routines unique to the debug 
mode constitute the fifth record. The sixth record of the compile file 
constitutes a full overlay (1,4). 

Debug COPYL Deck 

This deck contains a series of zero length COMPASS routines with identifiers 
of the (1,1) overlay routines needed to complete the (1,4) overlay. By 
compiling the fifth and sixth records of the compile file to the same object 
file, the object file may be used as an OLDLIB file for COPYL with the object 
file of the (1,1) overlay serving as the replacement file to produce a full 
(1,4) overlay. 

RDUMP 

This utility routine is to be used with the test mode of the compiler. For a 

single program unit, RDUMP will dump the R-list file generated by pass 1 of 

the compiler. (Since an attempt is made to keep this file completely in core, 

the V (for very small buffers) option on the control card should be used- it 
is active in test mode only.) ' 

CMPAR 

This routine compares two object records and lists discrepancies by loader 
table. It is unlikely that a FORTRAN program using the FTN4.0 internal 
assembler will have the same object representation as when it is handled by 
the COMPASS assembler (though a load from either of the object routines will 
produce the same core image in non-BSS storage) . 
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INSTALLATION INSTRUCTIONS 

The release tape for the FORTRAN Extended 4.0 compiler, PL7, contains 5 files. 
File 1 is the compiler program library. Files 2, 3, and 4 contain 
installation decks; file 5 contains an installation verification program. The 
decks in files 2 through 5 can be obtained by performing the job: 

Job card. 
REQUEST (PL7, E) 
REWIND (PL7) 
SKIPF(PL7,1,17) 
COPYBF(PL7,PUNCH,3) 
COPYBF (PL7 , PUNCH , 1 ) 
UNLOAD (PL7) 
6/7/8/9 



SKIP PL AND BINARY FILES 
INSTALLATION DECKS 
VERIFICATION PROGRAM 



The installation decks provide a method for introducing the FORTRAN Extended 
4.0 compiler into a SCOPE 3.4 system. The first job (CINSTAL) updates the 
program library, producing a new program library tape including supplemental 
binary files. Deck CINSTAL requires access to the COMPASS program library to 
acquire the common deck COMPCOM. The second job, CMAINT, updates the program 
library and supplemental binary files producing a new maintenance form tape. 
Deck CMAINT also requires access to the COMPASS program library. CINSTAL 
should be used only for initial installation; CMAINT should be used for 
subsequent maintenance. Deck FTNC2 must be run following CINSTALL or CMAINT 
but before attempting installation of the object library. 

The release tape for the FORTRAN Extended 4.0 object library, PL8, contains' 

three files. File 1 is the FORTRAN object library PL. File 2 contains a I 

maintenance procedure to be used with SCOPE 3.4; file 3 contains deck LIB4. I 

To obtain these decks, perform a job of the type J 

Job card. 

REQUEST ( PL 8, E) 

REWIND (PL8) 

SKIPF(PL8, 1,17) 

COPYBF(PL8,PUNCH,2) | 

UNLOAD (PL 8) 

6/7/8/9 

The installation decks provide a method for updating the program library 
and generating binary files to be introduced into the system. Deck FTN4LIB 
is the SCOPE 3.4 procedure to update the program library and generate ■ 
binaries to be used by FTN Version 4.0 programs. PL8 deck LIB4 must be run I 
following FTN4LIB; upon completion, job SCOPE3 (Section 1) can be run to ■ 
generate a deadstart tape. 

NOTE: The T7000 parameter on the CINSTAL job card must be changed to T20000 if I 
the deck is to be run on a 6200. | 
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CINSTAL,CME50CO,T70CO,MT2. 001 

COMMENT. THIS JOB UPDATES FORTRAN EXTENDED 4.0 FROM THE RELEASED PL7. 002 
COMMENT. AN UPDATED PROGRAM LIBRARY, TWO FILES WHICH WILL BE OF USE IN 003 
COMMENT. MAINTAINING THE COMPILER, ANO A FILE FOR EDITLIBING THE COMPILER 004 

COMMENT. INTO A RUNNING SYSTEM WILL BE PRODUCED ON THE TAPE NEWPL7. 005 

COMMENT. 006 

COMMENT. THE CONTENTS OF THE RELEASED PL7 ARE -- 007 

COMMENT. FILE 1 — COMPILER PROGRAM LIBRARY 008 

COMMENT. FILE 2 — INSTALLATION DECK 009 

COMMENT. FILE 3 — MAINTENANCE DECK 010 

COMMENT. FILE 4 — EDITLIB DECK FOR THE COMPILER 011 

COMMENT. FILE 5 — VERIFICATION PROGRAM CECK 012 

COMMENT. 013 

COMMENT. THIS JOB USES THE COMPASS V3.Q PL TO CAPTURE THE COMPASS 014 

COMMENT. CCMMCN DECK COMFCOM WHICH IS NECESSARY FOR COMPASS/FTN 015 

COMMENT. INTERFACE. 016 

COMMENT. 017 

REGUEST(PL2,E,HI) COMPASS PROGRAM LIBRARY 018 

UPDATE (G,P = FL2,N=COMPCOM,C=0) 019 

UNLOAD(FL2) 020 

REGUEST(FL7,E,HI) RELEASE PL7 021 

REGUEST<NEkFL7,N,HI) TAPE TO RECEIVE MODIFIED PL 022 

LAEEL<NEbFL7,W,L=FTN4P0COMF*3P4,D=H) 023 

REKIND(FL7,NEWFL7) 024 

UPDATE (F,P = FL7,N=NEWPL7,R=C> 025 

COFYEF(ECF,NEWFL7) 026 

UNL0AC(FL7) 027 

COMFASS(I=CCMFILE,L=LISTFTN,B=FTNMAC,S=0> 028 

COMPASS<I=CCMFILE,L=LISTFTN,B=FTNTEXT,S=Q) 029 

COMPASS(I=CCMFlLE,L=LISTFTN,B=SYSMAIN,S=IPTEXT,G=FTNTEXT) 030 

REWINCCSYSKAIM 031 

MAF(OFF) 032 

LOAO(SYSMAIN) 033 

NOGO. 034 

EOITLIE(USER) 035 

RETURN (FTN) 036 

LIERARY(NEWFTN) 037 

FTN(I=COMFILE,L=LISTFTN,GT=FTNTEXT,S=0,B=SYSOPT,OPT=1) 038 

FTN(I=COMFILE,L=LISTFTN,GT=FTNTEXT,S=0,B=FDEBUG,OPT=i> 039 

FTN(I=CCMFILE,L=LISTFTN,GT=FTNTEXT,S=0,B=FDEBUG,OPT=1) 040 

LIBRARY. 041 

REfcINC(SYSMAIN,FDEBUG> 042 

COFYL(FCEBLG,SYSMAIN f SYSDBG> 043 

REWINC(SYSMAIN,SYSOPT,SYSDBG) 044 

RETURMFCEEUG) 045 

COFYEF (SYSMAIN,SYSFTN) 046 

SKIFE(SYSFTN) 047 

COFYEF (SYSCFT,SYSFTN) 048 

REWINC(SYSFTN) 049 

C0FYEF(SYSFTN,NEWPL7) 050 

SKIPB(SYSFTN) 051 

COFYEF(SYSDEG,SYSFTN> 052 

REWIND (SYSDEG) 053 

C0FYBF(SYSCEG,NEWPL7J 054 

REWINO(SYSFTN) 055 

MAP (ON) 056 

LOAD(SYSFTN) 057 

NOGO. 058 

REWIND (FTNMAC, FTN) 059 
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C0FYER(FTNMAC,NEWPL7} 

C0FYBF(FTN,NEWFL7) ?f? 

UNLCAC<NEfcFL7) J^l 

^SlNCaiSTFTM ,HI> TAPE T ° RECEIVE CCMFILER LISTING 063 

COFYBF(LISTFTN,LISTAPE) °?J 

UNLCACCLISTAPE) "!?;? 

7/8/9 END CF RECORD Ubb 
*C CCPFCCM 
7/8/9 ENC CF RECORD 

V PLACE 4NY INSTALLATION MODIFICATIONS AFTER THIS CARD. 

7/8/9 END CF RECORD 

LIERARY(NEWFTN,NEW) 

ADC(FTN,FTN,AL=3) .__ 

FINISH. Q7 l 

LIERARY(SYSCVL,NEW) "'? 

ADGULSTFRCS$if$FTNMSG$$S f FTN> «i? 

FINISH. "l! 

ENCRUN. Hi: 

7/8/9 END CF RECORD 
6/7/8/9 END CF FILE 



068 
07C 
072 



078 



CMAINT,CMe5G0 0,T7Q0C,MT2. QQ1 

COMMENT. THIS JOB UPDATES THE FORTRAN EXTENDED COMPILER AND CREATES 002 

iSSUI?] - A NEI " PL? WITH FR0GRAM LIBRARY AND CCMFILER BINARIES. 003 

COMMENT. . 

COMMENT. THE CONTENTS OF THE NEWFL7 TAPE ARE — 005 

COMMENT. FILE i — FORTRAN COMPILER PROGRAM LIBRARY 006 

rn^ E K.T # ll^l I " REL0CATAE «-E BINARIES CF THE NON DEBUG OVERLAYS 007 

LUrfltNT. FILE 3 — RELOCATAPLF aTWAPTFC re Tuc npejur niirm «« «-» 

LUMfltM. FILE k — FTNMAC AND ABSOLUTE BINARIES OF THE COMPILER 009 

CO MMENT. _ . 

COMMENT. THIS JOB USES THE COMPASS V3.0 PL TO CAPTURE THE COMPASS 011 

COMMENT. CCMMCN DECK COMPCOM WHICH IS NECESSARY FOR COMPASS/FTN 012 

COMMENT. INTERFACE. n . , 

COMMENT. U *r 

REGUEST(FL2,E,HI> COMPASS PL lit 

UPCAT6(G,P=FL2,N=COMPCOM,C=a) n <l 

UNL0AD(FL2) "" 

REGUEST(CLCFL7,E,HI) pi tt. rf itDnATcn -.1 

REGUEST,NEWFL7,N,HI. TAPE TO RECEIVE MODIFIED PL all 

LAEEL<NEfcPL7,W,L=FTN4P0CCMP*3P4,D=HI) J 
REKINC(CLDFL7,NEWPL7) 
UPDATE (F = CLCPL7,N=NEWPL7,R=C> 
C0FYEF(ECF,NEWFL7) 

C0FYeF(CLCFL7,ML) np , 

COMPASS(I=CCMFILE,L=0,S=0,P=FTNMAC) n?l 

COMPASS (I=CCMFILE-,L=0,S=0,B=FTNTEXT> «VL 

FTN(I = CCMFILE,GT=FTNTEXT,S=IPTEXT,L = 0,B=REPLACE,OPT=1) n 2 7 

FTN(I=COMFILE,GT=FTNTEXT,S=IPTEXT,L=G,B=REPLACE,CPT=l) 028 

FTN(I=CCMFILE,GT=FTNTEXT,S=IPTEXT,L=0,a=REPLACE,CPT=l) 029 

CO FYL(CLCFL7, REPLACE, SYSMAIN) „n 

CO FYL(CLCFL7, REPLACE, SYSDBG) JVt 

UNLCAC(0LCFL7) lil 

REWINC(SYSMAIN, SYSDBG) lit 

C0FYEF(SYSMAIN,NEWPL7) n i L 

C0FYBF(SYS0EG,NEWPL7i „,£ 

SKIPE(SYSMAIN) Q ^ 



021 
022 
023 
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RENIND(SYSDBG) 

COFYEF (SYSOBGiSYSMAIN) 

MAF(CN) 

LOAO(SYSMAIN) 

NO GO. 



044 
045 

047 

049 



037 
036 
039 
040 
041 

REHIND<FTN,FTNMAC> °£| 

C0FYBR(FTNMAC,NEWPL71 UHO 

COFYEF <FTN,NEWPL7J 

UNLOAD (NEHFL7) 

7/6/9 END CF RECORD 

»C CCMPCGM 

7/8/9 END CF RECORD 

*C FTKHACfFTNTEXT ^^ nKn 

V PLACE ANY COMPILER MODIFICATIONS AFTER THIS CARD. 050 

7/8/9 END CF RECORD 
6/7/8/9 ENC OF FILE 

FTNC2,CM55 0(]0,T70QO,MT1. ^02 

COMMENT*. THIS JOB EDITLIBS THE FT* COMPILER INTO THE RUNNING SYSTEM 003 

COMMENT. FROM THE TAPE MADE BY DECK CINSTAL OR CMAINT 00£ 

COMMENT. Q06 

COMMENT. • „ , nn7 

LAEEL(FTNCOMP,R,L=FTN4P0COMP»3P4,0=HI> MOUNT PL7 OB' 

RENINO,FTNCCMF. :" 

SKIFF<FTNCCMP,3,17> l" 

COPYBF(FTNCOMP,FTNC) Jt" 

REWINO F1NCFTNCCMP. u \t 

UNLOAD FTNCCMF. ", 
EDITLIE<SYS1EM> 

7/8/9 END CF RECORD Q±5 

REACY<SYSTEM,CLO). Q16 

LIERARY<NUCLEUS,OLD>. Z* 7 

REFLACE(FTNMAC,FTNC)* " 

REFLACECFTN,FTNC f AL=3,FL=4700Q,FLO=i>. j£| 

FI NISH . 020 

LIERARY(SYSCVL,CLD>. 021 

REWIND(FTNC). Q22 

REFLACEC JLSTFRC$$$*$PASS14$$$t FTNC) . J|* 

FINISH. 02 ^ 

COMFLETE. QZ5 

ENCRUN. 

7/8/9 END OF RECORD 

6/7/8/9 ENC OF FILE The T 1000 parameter on this job card 

. is insufficient on a 6200 or 6400. 

f Please increase the value to T2000. 

FTN4LIB f CH6DO00,TiCOOfMT2. m .„,-« , n « n . c r»T nni> 

COMMENT. THIS SCOPE 3.4 JOB UPDATES T*E FORTRAN EXTENDED 4.0 OBJECT 002 

COMMENT. LIBRARY FROM THE RELEASED PL8 OR FRO* A NEWPL8 TAPE. AN 003 

COMMENT. UPDATEO PROGRAM LIBRARY AND A FILE CONTAINING ASSEMBLED 004 

COMMENT. BINARIES OF THE LIBRARY HILL BE PRODUCED ON THE TAPE NEWPL3. 005 

COMMENT. ^ ^ rjn 7 

COMMENT. THE CONTENTS OF THE RELEASED PL8 ARE — »£' 

COMMENT. FILE i — FORTRAN OBJECT LIBRARY PL »g» 
COMMENT. FILE 2 — 3.4 INSTALLATION DECK "09 

COMMENT. FILE 3 — 3.4 EDITLIB DECK J" 

COMMENT. FILE 4-6 — 2.0 INSTALLATION DECKS 011 



001 



1-9-22 



60307400 C 



REGUEST(FL8,E,KI) RELEASE FL8 OR NEWFL8 FROM PRIOR RUN 012 

rt£CUEST,NEWFL8,N,HI. TAPE TO RECEIVE UPDATED PL 013 

LAEEL<NEkPL8,W,L=FTNLieS*3Fi*,0 = KI) 01<* 

REWINC(FL8,NEWFL8> 015 

UPGATE(F,P=FL8,N=NEWPL8,R=C> 016 

COFYEF(ECF,NEKFL8) 017 

UNL0ACCPL8) 018 
COKPASS(I=CCMFILE,L=LISTLIE,S=SYSTEXT,S=IPTEXT,B=LIBRARY) I/C-MATH LIBRARY 019 
FTN(I=CCr'FILE,L=LlSTLIB,S=SYSTEXT,S=IPTEXT,B=LIBRARY,OFT-l)FTN DEBUG LIBRARY 020 

RE MNG (LIBRARY) 021 

COFYEF(LIBRARY,NEWPL8) 322 

UNL0ACCNEWFL8> 023 

RECUEST(LISTAFE,HI) TAPE TO RECEIVE LIBRARY LISTING 024 

REKIIMC(LISTAPE) 025 

RcfclNO(LISUie) 026 

COFYEF(LISTLie,LISTAPE) 027 

UNLOAC(LISTAPE) 028 
7/8/9 END OF RECORD 

*/ PLACE ANY LIBRARY MODIFICATIONS AFTER THIS CARO. 030 
7/8/9 END CF RECORD 
6/7/8/5 ENC OF FILE 

LIE4,CM55000,NT01>T70CO. 001 

COGENT. THIS JCB EDITLIBS THE FTN LIBRARY INTC THE RUNNING SYSTEM. 002 

LAEEL(FTNLIE,R,L=FTNLIBS*3P*f,0 = HI)M0UNT PL8 MACE BY DECK FTN4LIB 003 

REkINC,FTNLIE. 0Q£ * 

SKIPF(FTNLIE,1,17J 005 

COFYEFCFTNLIB,FTNL> 006 

REWINC FTNLIB,FTNL. 007 

UNLOAD FTN LIB. 0Q8 

EOITLIE(SYSTEM> 009 
7/8/9 ENO CF RECORD 

REAOYCSYSTEPtOLD) 011 

LIERARY<FCRTRAN,CLDK 012 

REFLACE(*tFTNL). 013 

FINISH. 014 

COMPLETE. ° 15 
ENCRUN. 

7/8/9 END CF RECORD 
6/7/fi/<9 END OF FILE 



616 
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VERIFICATION PROGRAM 

Dayfile output of the FTN 4.0 verification program should be similar to the 
following: 

SCCFE 3.4 
05.44.23.VFTNC3Z 
05 .44.23.VFTN,CM55000,T200. 

05. 44. 23, THIS SIMPLE PROGRAM VERIFIES CORRECT IN 
Q5.44.23.STALLATI0N OF 

05.44.23. FORTRAN EXTENDED 4.0 
05.44.23.FTN(6,OPT=i) 

05.44.24. .727 RT SECONDS LOA0 TIME 
05.44.28. .356 CP SECONDS COMPILATION TIME 
05.44.28. LG0 

05.44.33. 4.754 RT SECONDS LOAD TIME 

05. 44. 33. COMPUTATION' SUCCESSFUL 

05.44.33. STOP 

05.44.33.EKSP(IKPUT) 

05.44.35. 1.485 RT SECONDS LOAD TIME 

05.44. 35 .RETURN(LGO) 

05.44.37.FTN(G,OPT=2) 

05.45.02. 11.035 RT SECONDS LOAD TIME 

05.4i.07. .434 CP SECONDS COMPILATION TIME 

05.45.07.LGC 

05.45.12. 4.703 RT SECONOS LOAD TIME 

05. 45. 12. COMPUTATION SUCCESSFUL 

05.45.12. STOP 

Q5.45.i2.BKSP(IKPUT> 

05.45.14. .975 RT SECONDS LOAD TIME 

05.45.14.RETURMLGO) 

05.45.14.FTMG,OPT=01 

05.45.27. 2.013 RT SECONDS LOAD TIME 

05.46.21. .238 CP SECONDS COKFILATION TIME 

05.46. 21. LGO 

05.47.10. 48.476 RT SECONOS LOAC TIME 

05. 47. 10. COMPUTATION SUCCESSFUL 

05.47.10. STOP 

05.47.10. END OF JOB 

05.47. 10. CFA 3.492 SEC. 

05.47.10.PP 27.262 SEC. 
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RELEASE MATERIALS 

COBOL Version 4.0 release material consists of a magnetic tape containing the 
program library. 

The source code has been reseguenced completely. 

NEW FEATURES 

New features incorporated in version 4.0 include the following: 

1. New verbs (REWRITE, DELETE, SKIP) to support IS and DA files and future 
COBOL standardization. 

2. All I/O handled through Record Manager to provide compatibility with other 
compilers. 

3. Compliance with ANSI COBOL standards. Non-ANSI usage and statements can 
be diagnosed by the compiler. 

4. Faster execution times as a result of generating more code inline and more 
optimization. 

5. Compilation and execution of version 3.0 programs under control card 
option. 

6. selection of 6400 or 6600 object code fcr more execution efficiency. 

7. Dynamic sort area and buffer assignment at execution time, therfore a 
reduction in field length requirements. 

CORRECTIONS 

All eligible PSR code has been added to the program library including all code 
as published through PSR Summary No. 314. 
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LIMITATIONS 



Source decks may need modifying if the following are used 



USE procedures. The USE AFTER STANDARD LABEL Procedure on output files 
now is executed just before the label is written. Previously, it was 
executed after the label was written. 

Positive sign presence on signed fields. The positive sign will not 
always be carried. The absence of a negative sign now signals positive. 
Existing tests must be changed that redefine the field as alphanumeric and 
compare with the letters A- 1 or < (less than) . 

Random files. Version 3.0 random files must be converted to 1.0 format 
with the supplied conversion routine. (See CONVERSION AIDS discussion in 
Section 6) . 

ENTER statements containing a parameter to reference an FET. COBOL 4.0 
establishes FIT'S which contain a pointer to the FET; the code must be 
altered to go through the FIT to the FET. 

Blank fill on variable length records. For reasons ot efficiency COBOL 
4.0 does not guarantee blank fill on variable length records, except for Z 
type records. Version 3.0 blank filled all variable length records. Care 
must be taken that unused portion of the record area are not expected to 
contain blanks. 

Non-standard labels are no longer in the record area. They are read into 
each label area only, and any references to the record area will have to 
be changed. 

End of file cards: On INPUT, Version 3 considered 7/8/9 level 15 as end 
of file. Version 4 considers all 7/8/9 cards as end of file. 

When an elementary A/N item of more than 18 characters is moved to a 
numeric edited field, the rightmost are moved rather than the leftmost. 

No editing on a group to a numeric edited field. 

Signed numeric to an equal A/N field removes the sign. To an unequal size 
field, the sign is not removed. 

INSTALLATION PARAMETERS 

The COBOL compiler uses symbol definitions from IPTEXT for IP.CMU, IP. IMUL, 
and IP. TYPE (see SCOPE section discussion of IP ARAMS) . To override these 
installation parameter values, make the following changes in the COMDECK 
ASSEMOP when COBOL is assembled. 



Feature 

Generate code optimized for a 6600 
Generate code optimized for a 6400 
Generate integer multiply instruction code 
Generate non-integer multiply instruction code 
Generate CMU instructions 
Generate non CMU instructions 



Change Required 

*D ASSEMOP. 3, 4 
*D ASSEMOP. 3 
*D ASSEMOP. 6, 7 
*D ASSEMOP. 6 
*D ASSEMOP. 9, 10 
*D ASSEMOP. 9 
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INSTALLATION PROCEDURES 

The release tape, PL9, contains seven files. File one contains the COBOL 4.0 
program library. This file includes both compiler and object routines. Files 
2-4 contain binary decks of the object time routines and the compiler 
overlays. Files 5 and 6 contain the installation decks, and file 7 contains 
the sample installation verification program. 

The installation job decks add COBOL to the running system. The first job 
(COBOL1) uses the release tape as input to create a tape containing four files 
as output: 

File 1 Update version of the COBOL program library 

File 2 Relocatable binary records resulting from assembly plus the COBOL 
system routines 

File 3 Overlays forming the COBOL 4.0 compiler that will be installed into 
the system 

File 4 COPYCL routine in absolute form 

When the second job (COBOL2) is performed, using either the released tape or 
the output tape created by the first job (COEOL1) , COBOL 4.0 is added to the 
running system by EDITLIB. Job SCOPE3, described in Section 1, can be used to 
generate a deadstart tape. 

These installation decks can be acquired by performing the job: 



Job card. 
REQUEST (PL9,E) 
REWIND (PL9) 
SKIPF(PL9,4, 17) 
COPYBF (PL9,PUNCH,2) 
COPYBF(PL9, PUNCH, 1) 
UNLOAD (PL9) 
6/7/8/9 



iMOUNT COEOL 4.0 PL 

SKIP COBOL PL AND BINARY 
PUNCH INSTALLATION DECKS 
PUNCH VERIFICATION PROGRAM DECK 
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COEGL1,CM6CCOO,T7QOG,MT02. 001 

COMMENT. THIS JOB UPOATES AND CREATES THE BINARY OF COBOL 002 

COMMENT. THE NEW PL9 WILL CONSIST OF FOUR FILES 003 

COMMENT. THE FIRST FILE WILL BE THE COBOL NEWPL 004 

COMMENT. THE SECOND FILE WILL BE THE BINARY OF THE OBJECT TIME ROUTINES 005 

COMMENT. AND THE RELOCATABLE BINARIES OF COBOL (COMPILER OVERLAYS) AND 006 

COMMEM. CCFYCL 007 

COMMENT. THE THIRD FILE WILL BE THE BINARY OF THE COMPILER OVERLAYS 008 

COMMENT. THE FCIRTH FILE WILL BE THE BINARY OF THE OVERLAY COPYCL 009 

LAEEL(FL9IN,R,L=C0B0L4PQ*3P4,0=HI) COBOL OLOPL 010 

REQUEST, FL9,N, HI, SCRATCH FOR NEW PL9 011 

LAEEL(FL9,W,L=CCB0L4PC*3P4,D=HI) 012 

REWIND(FL9IK,FL9) 013 

UPDATE <F,P=FL9IN,N=PL9,X) 14 

UNLOAD (PL9IN) 015 

COMPASS(I=CCMFILE,S=IOTEXT,S=IPTEXT,L=0) 016 

COMFASS(I=CCMFILE,S=CFCTEXT,L=0) 017 

COMPASS<I=CCMFILEtS=CPCTEXT,L=0) 018 

SKIPF(FL9,i,17) 019 

REWINC(LGC) 02 o 

C0FYEF(LG0,FL9> 021 

REWIND, L60. 022 

COFYER(LGO,NIL,90) 023 

COFYDR(LGO,NEWLGO,102) 024 

COFYER (LGC,CCFYLG0,3) 02 c 

LOSET(LIB=SYSIO) 026 

LOAD(NEWLGO) GENERATION OF OVERLAY COBOL 027 

NO G C • 028 

REWINC,CCEOL. 029 

C0FYBF(CCB0L,FL9) 030 

LOAD(CCFYLGC) GENERATION CF OVERLAY COPYCL 031 

NOGC. 032 

REWIND, CCPYCL. 033 

C0FYPF(C0FYCL,FL9) 3<* 

UNL0AC(FL9) 035 
7/8/9 END CF RECORD 

»/ ADC CCRRECTICNS HERE 037 
7/8/9 ENO OF RECORD 
6/7/8/9 END OF FILE 

COEOL2,CM550Q0,T70GC,MTi. 001 

COMMENT. THIS JCB EDITLIBS THE COECL V4.0 BINARIES FROM THE RELEASED 002 

COMMENT. COEOL FL OR THE PL CREATEC BY DECK COEOL1. 003 

LAEEL(FL9,R,L=CCBOL4P0»3P4,D=HI) MOUNT COBOL 4. PL 004 

REWIN0,FL9. 005 

SKIPF(FL9,1,17) SKIP OLDPL 006 

COFYeR(PL9,COEL,90) COBOL LIBRARY ROUTINES 007 

SKIFF(FL9,1,17) SKIP RELOCATABLE COMPILER ROUTINES 008 

COFYBF(PL9,COECV) COBOL ABSOLUTE COMPILER ROUTINES 009 

COFYBF(FL9, COPYCL) COPYCL 010 

RE WIND, PL9,C0EL,COB0V, COPYCL. 011 

UNL0A0CPL9) 012 

EDITLIE(SYSTEM) 313 

COMMENT. «** END OF JOB *** 014 
7/8/9 END CF RECORD 

REAOYCSYSTEN 016 

LIERARY(MJCLEUS,OLD) 017 
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REFLACE(CCeCL,CCBOV,AL=3,FL=56Q0C|FLO=l) 018 

REFLACE(COFYCL,COPYCL*AL=3,FL=35GQQ,FL0=l> 019 

FINISH. 020 

LIERARY(SYSCVL,CLO) 021 

REFLACE(*,CCBOV) 022 

FINISH. 023 

LIBRARY(COECL,CLD> 024 

REPLACED, CCEL) 025 

FIMSH. 026 

COMPLETE. 027 

ENDRUN. 028 
7/8/9 END CF RECORD 
6/7/8/9 END OF FILE 

VERIFICATION PROGRAM 

The dayfile output for the COBOL 4.0 verification program is listed below. 

SCOPE 3.** 
05.44.24.VCCBC30 
05.44.25.VCCB,CM60QC0,T20. 

05.44.25. THIS SIMPLE PROGRAM VERIFIES CORRECT IN 
05.44.25.STALLATION OF 
05.44.25. CCBCL 4.0 
05.44.25.CCEOL(LX) 

05.44.28. 2.492 RT SECONDS LOAD TIME 

05. 44. 31. COMPILING COBOL-V 

05.44.42. 0CO E AND 0C0 T/U DIAGNOSTICS ISSUED 
05.44.42. FIELD LENGTH NEEDED FOR COBOL 052300 
{35-^4-42- *2Q3 GP SECONDS COMPILATION TIME 

05. 44. 42. END CCEOL 
Q5.44.42.MAFC0FF) 
05.44.42.LGO. 
05.44.51. 7.862 RT SECONDS LOAD TIME 

05.44.51. COEOL 4.0 EXISTS UNDER SCOPE 3.4 

05.44.52. END OF JOB 
05.44.52.CPA 1.118 SEC. 
05 .44. 52. PF 11.554 SEC. 
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SORT/MERGE VERSION 4.0 11 



RELEASE DESCRIPTION 

SORT/MERGE 4.0 runs under 6000 SCOPE 3.4 and 6000 RECORD MANAGER 1.0. 

RELEASE MATERIALS 

SORT/MERGE 4.0 is released on program library tape PL10. 

HARDWARE CONFIGURATION 

SORT/MERGE 4.0 requires the same minimum hardware configuration as SCOPE 3.4. 
If the Tape Sort option is used, additional magnetic tape units are required: 
polyphase requires three; balanced requires four. 

NEW FEATURES 

The following new features were added for user convenience and system 
reliability: 

FBEE FIELD CONTROL CARDS 

Two SORT/MERGE control card directive types are availaole to the user. Format 
1 , an upward 7000 based compatible design, has free field directives beginning 
in columns 1-72. Format 2 is based on 6000 SORT/MERGE 3.0 control card 
formats. Format 2 control cards will enable the user to run 3.0 jobs without 
rewriting them. New SORT/MERGE jobs should be written in Format 1. 

UNLIMITED SIZE AND/OR NUMBER OF FILES 

SORT/MERGE 4.0 imposes no restrictions on the size of the file or number of 
iij,6s to y6 sortcu in a single run, other tuan the restrictions under 6RM. 
Currently 100 input files are allowed. 

COLLATING SEQUENCE CHARACTERS 

Characters within a collating sequence may be equated by the user. 

OWNCODE EXITS 

The systeir provides the user with additional OWNCODE exits, EXIT5 and EXIT6. 
The EXIT5 option exits to the user when twc records with identical keys are 
fcund. EXIT6 is required for non-standard labeled tapes in directive Format 
1 . EXIT6 supplies the non-standard label to the user for validation on input 
and exits to the user for the non-standard label on output. When directive 
Format 2 is used, non-standard labels are skipped and not processed. 



60307400 A 1-11-1 



A. NEW SORT/MERGE FORMAT 

The 6000 SORT/MERGE 3.0 Macro format has been replaced with a new format which 
is upward 7000 compatibile. 

MODIFICATIONS 

1. The 4.0 SORT/MERGE system does not provide the TAG SORT capability. 

2. 6RM handles the following: 

Record types 
Block types 

Parity error processing 
Padding character processing 
Label processing 

Multi-reel and multi-file reel processing 
Disk overflow detection (SORT/MERGE still 
handles disk overflow recovery) 

GENERAL DESCRIPTION 

SORT/MERGE 4.0 runs under SCOPE 3.4 and 6RM 1.0. The system consists of two 
control card directive formats and a Macro Sort format. Directive format 1 is 
based en upward compatibility toward 7000 SORT/MERGE and Format 2 is based on 
the SORT/MERGE 3.0 control card format. The Macro Sort format is also based 
on 7000 compatibility. SORT/MERGE 4.0 is a more modularized package, 
consisting of overlay modules which are in core only when necessaryt (For 
example, a disk sort does not need the tape merge overlay modules.) This 
product is designed to optimize speed and core space as well as to utilize 6RM 
and SCOPE 3.4 capabilities. 

INSTALLATION PROCEDURE 
PL10 contains the following files: 
File Contents 

1 SORT/MERGE program library 

2 SORT/MERGE relocatable binary decks (macro sort) 

3 SORT/MERGE relocatable binary decks (control card sort) 

4 SORT/MERGE binary overlays 

5 SMTEXT binary 

6 SORT1 Installation deck 

7 SORT2 Installation deck 
8,9,610 Verification programs 

To obtain the installation and verification program decks, perform a job of 
the type: 

Job card. 

REQUEST (PL10,E) Assicn SORT PL 

SKIPF(PL10,5,17) 

COPYBF(PL10,PUNCH,5) 

UNLOAD (PL10) 

6/7/8/9 
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The installation jobs function as follows: 

SCRT1 Updates the program library with modifications producing a new 

program library tape including assembled binary information as 
supplemental files. This job essentially allows creation of a 
revised release tape. 

S0RT2 £dds SORT/MERGE to the running system. S0RT2 can use either the 

released PL 10 or a tape created by job SORT1 as input. 

^.fter job SORT2 has been run, job SCOPE3 described in Section 1 can be run to 
create a deadstart tape of the running system containing SORT/MERGE. 

The system text SMTEXT is installed via execution of installation decks SORT1 
and SORT2 . 

SORT1,CMSS>000,T7000,MT2. 001 

COMMENT. THIS JCB UPOATES AND CREATES THE BINARY OF SORT/MERGE 002 

COKMENT. THE NEW PL1C WILL CONSIST OF FIVE FILES 003 

COMMENT. THE FIRST FILE WILL BE THE NEWPL 004 
COMMENT. THE SECOND FILE WILL BE THE BINARY OF THE RELOCATABLE ROUTINES FOR Q05 

COKMENT. MACRO SORT 006 
COMMENT. THE THIRO FILE WILL BE THE BINARY OF THE RELOCATABLE ROUTINES FOR 007 

COMMENT. CONTROL CARD SORTS 008 

COMMENT. THE FOURTH FILE WILL BE BINARY OF THE SORT OVERLAYS 009 

COMMENT. THE FIFTH FILE WILL BE THE BINARY OF SMTEXT 010 

LAEEL<FL10IN,R,L=SORT4P0*3F4,D=HI) MOUNT SORT V4.G PL 011 

REQUEST, FL1Q,N, HI. SCRATCH FOR NEW PL10 012 

LAEEL(FL10,W,L=SCRT4PO*3P4,D=HI) 013 

REKINO(PL1GIN,PL10) 01^ 

UPCATE(F,P=FL10IN,N=PLi0,X> 015 
COfcPASS(I=CCMFILE,S=IOTEXT,S=IPTEXT,B=SRTOBJ,L=0> COMPILE ALL BINARIES 016 

COKPASS(I=CCMFILE,S=Q,L=0) COMPILE SMTEXT 017 

REHNC,SRTCEJ. 018 

REMNOaGC) 019 

SKIFF(FL10,1,17) 020 

REWING(PLIGIN) 021 

SKIPF<PL1GIN,1,17) Q22 

COFYL(FLiQIN,SRTGBJ,PLi0) PUT FILE TWO ON NEWPL 023 

REWIND, SRTCEJ. 024 

COFYL (FL10IN,SRTOBJ,SRTOBJ2) 025 

REWIN0CSRTOEJ2) 026 

COFYEF(SRTCEJ2,FL10> PUT FILE THREE ON NEWPL 027 

REWIND(SRTCEJ2) 028 

LOSET(LIE=SYSIC/NUCLEUS) 029 

L0AD(SRT0EJ2) GENERATION CF SORT OVERLAYS 030 

NOGO. 031 

REWIND, SCRTfRG. 032 

COFYL(FLiQIN,SCRTMRG,PL10> PUT FILE FOUR ON NEWPL 033 

COFYEF(LGO,FL10) PUT FILE FIVE ON NEWPL 034 

UNLCAC(PL10,FL10IN) 035 
7/8/9 ENO CF RECORD 

V ACC CORRECTIONS HERE 037 
7/8/9 END OF RECORD 
6/7/8/9 END CF FILE 
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SOFT2,CM5:>CG0,T700G,MTi. 001 

COKMENT. THIS JCB TAKES THE SORT/MERGE BINARIES FROM PL10 AND EDITLI9S 002 

COMMENT. THEM INTO THE RUNNING SYSTEM. EITHER THE RELEASED VERSION OF 003 

COMMENT. FL10 CR THE VERSION CREATED 8Y DECK SCRT1 MAY BE USED. 004 

LABEL(FL10,R,L=SORT4P0*3P4,D=HI) MOUNT SORT/MERGE V4.0 PL 005 

REMNCPL1G. 006 

SKlPF(FL10,i,17> SKIP CLDPL 007 

COFYEF(FL10,SORTM> GET BINARIES FOR MACRO SORTS 008 

SKIPF(FL1G,1,17> SKIP RELOCATABLES FOR CONTROL CARO SORTS 009 

COFYER<PL10,SORTC,1> 0,0 OVERLAY 010 

COFYEF(FL1G,SCRTO) REST CF OVERLAYS 011 

COFYEF(FL10,SMTXT) SMTEXT 012 

REWIND, SMTXT. 013 

REfcIND,PL10,SGRTM,SORTC,SORTO. 014 

UNLOAD(FLIO) 015 

EDITLIE(SYSTEM) 016 

COMMENT. *** END OF JCB *** 017 
7/8/9 END OF RECORD 

READY(SYSTEM) 019 

LIERARY(NLCLEUS,OLD) 020 

REFLACE(*,SCRTC,AL=3,FL=60000,FLO=1) 021 

R£FLACE(*,SMTXT,AL=0i 022 

FINISH. 023 

LIERARY(SYSCVL,CLD) 024 

REFLACE(*,SCRTC,AL=0) 025 

FINISH. 026 

LIERARY(CCECL,CLD) 027 

REFLACE(*,SCRTH) 028 

FINISH. 029 

COMFLETE. 030 

ENCRUN. 031 
7/8/9 END CF RECORD 
6/7/8/9 END OF FILE 
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VERIFICATION PROGRAM 

Dayfile output for the verification programs is as follows: 

SCCFE 3.4 
05.44.51.VSCRT31 
05.44.52.VSCRT1,CM65Q0Q,T50G. 

05.44.52. DIRECTIVE FORMAT i VERIFICATION DECK - 
05.44.52. SORT/MERGE 4.0 

05.44.52. JOB SORTS 10 RECORDS - ASCENDING ORDER 
05.44.52.FILEUNPUT t RT=Z,BT=C ,FL = 80,ERL=i) 
05. 44. 54. FILE (OUTPUT* RT=Z,BT=C,FL=8 0,ERL=i> 
Q5.44.57.S0RTMRG(7C) 

05.45.40. 1.475 RT SECONDS LOAD TIME 

05.47.05. ** INSERTIONS DURING INPUT ********* Q 
05.47.05. ** DELETIONS OURING INPUT *********$ 

05.47.05. ** TOTAL RECORDS SORTED ******** 1G 

05.47.05. ** INSERTIONS DURING OUTFUT *********$ 
05.47.05. ** DELETIONS OURING OUTFUT *********$ 
05.47.05. ** TOTAL RECORDS OUTPUT ******** ^q 

05.47.05. **END SORT RUN 
05.47.06.CFA .254 SEC. 

05. 47. 06. PF 20.724 SEC. 



SCCFE 3.4 
05.44.36.VSORT32 
05.44.37.VSCRT2,CM650C0,T50C. 

05.44.37. DIRECTIVE FORMAT 2 VERIFICATION DECK - 
05.44.37. SCRT/MERGE 4.0 

05.44.37. JOE SORTS 10 RECORDS - ASCENDING ORDER 
05.44.37.S0RTKRG(6C) 

05.45.25. 1.636 RT SECONDS LOAD TIME 

05.45.42. ** INSERTIONS DURING INFUT ********* Q 
05.45.42. ** DELETIONS OURING INPUT ********* Q 

05.45.42. ** TOTAL RECORDS SORTED ********±q 

05.45.42. ** INSERTIONS DURING OUTFUT *********q 
05.45.42. ** DELETIONS DURING OUTFIT *********q 
0b. 45. 42. ** TOTAL RECORDS OUTPUT *****#** 1 o 

05.45.42. **END SORT RUN 
05.45.43.CFA .234 SEC. 

05. 45. 43. PF 16.522 SEC. 

05. 45. 43. IC .281 SEC. 
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SCOPE 3.4 
05.44.50.VSCRT33 
05.44.5Q.VSCRT3,CM650CO,T50 0. 
Q5.kk.5Q* MACRG SORT VERIFICATION DECK - 
05.44.50. SORT/MERGE 4.0 

05.44.50. JCE SORTS 10 RECORDS - ASCENDING ORDER 
05.44.50.COKPASS(S=SMTEXT,S=IOTEXT> 
05.44.57. ASSEMBLY COMPLETE. 52700B SCM USED. 
05.44.57. 1.333 CPU SECONDS ASSEMBLY TIME. 

Q5.44.57.LCSET(LIB=C0B0L/SYSI0) 
05.44. 58. LGC. 

05.45.06. 8.113 RT SECONDS LOAO TIME 

05.45.06. 
05.45.06. 

05.45.08. ** INSERTIONS DURING INFUT ♦♦»»»•»»♦() 
05.45.08. ** DELETIONS DURING INPUT »«»»»*»#» 

05.45.08. ** TCTAL RECOROS SORTED ##*##»*# 10 

05.45.08. ** INSERTIONS OURING OUTFUT *♦**♦♦**♦() 
05.45.08. *» DELETIONS DURING OUTPUT ••♦♦•♦»»» 
05.45.08. ** TCTAL RECOROS OUTPUT ♦•♦♦♦♦*» 10 

05.45.08. **ENC SORT RUN 
05.45.08.CPA 2.682 SEC. 

05. 45. 08. PF 6.389 SEC. 



1-11-6 60307400 A 



QUERY UPDATE VERSION T.O 12 



RELEASE DESCRIPTION 

QUERY UPDATE (QU) Version 1 . is contained in the SCOPE 3.4 product set. 

RELEASE MATERIALS 

QU 1.0 is released on the program library tape PL11. QUIDDL is also included 
on this tape. 

The structure of the release format PL11 is as follows: 

Files 1 -3 QU, as follows 

1 QU program library 

2 QU binary - absolute format 

3 QU binary - relocatable format 

Files 4-6 QUIDDL, as follows 

4 QUIDDL program library 

5 QUIDDL binary - absolute format 

6 QUIDDL binary - relocatable format 

Files 7-13 Installation Decks 

7, 8 QU installation decks 
9,10,11 QU, QUIDDL verification decks 
12,13 QUIDDL installation decks 

HARDWARE CONFIGURATION 

QU requires the same minimum hardware configuration as SCOPE. 
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3ENERAL DESCRIPTION 

The user, either at a terminal or through batch processing, can insert or 
delete records in a file, modify and display fields within records, specify 
selection criteria for record manipulation, and define various modes for 
operation and input /out put options. 

Data to be manipulated must be on a mass storage device; it may be organized 
as sequential, indexed sequential or direct access. Data within a file is 
referred to by symbolic names which have been recorded in a mass storage 
directory constructed through use of QUIDDL. 

QU is written primarily in SYMPL, but it has several COMPASS routines. 

INSTALLATION OPTIONS 

The installation of Query Update Version 1.0 does not require selection or 
modification of any installation parameters. 

INSTALLATION PROCEDURES 

To obtain the QU installation decks, execute a program of the type: 



Job card. 

REQUEST (PL 11, E) 

SKIPF(PL11,6,17) 

COPYBF(PL11,PUNCH,2) 

COPYBF (PL1 1 ,PUNCH,3) 

UNLOAD (PL 11) 

6/7/8/9 



SKIP QU AND QUIDDL PL AND BINARIES 
PUNCH VERIFICATION JOBS 



Deck QU1 allows regeneration of PL11 to incorporate changes to the program 
library file which will be reflected in the binary. Successful formation of 
the absolute overlay may result in externals unsatisfied to the different 
access methods. This is of no consequence if such access methods are not to 
be used. Access methods IS 2.0, DA 1.0 should be present in the running 
system to satisfy externals when the NOGO directive of the deck QU1 is 
honored. Deck QU2 adds binary from either the released PL1 1 or a tape created 
by QU1 to the running system. Once QU2 has completed, job SCOPE 3 (section 1) 
can be used to create a deadstart tape from the running system. 
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QUi,Cfce40QG,T7G0Q,MTQ2. 001 

COMMENT. THIS JCB UPDATES AND CREATES THE BINARY OF Q/U 002 

COMMENT. AND CCFIES THE OLDPL AND EINARY OF QUIDDL TO THE NEW PLii. 003 

COMMENT. THE NEW PLii WILL CONSIST OF SIX FILES 004 

COMMENT. THE FIRST FILE OF PLII WILL BE THE QU NEWPL 005 

COMMENT. THE SECOND FILE WILL BE THE ABSOLUTE EINARY OF QU 006 

COMMENT. THE THIRD FILE WILL BE THE RELOCATABLE BINARY OF THE OVERLAY GU 007 

COMMENT. THE LAST THREE FILES WILL BE QUIDDL 008 

LAEEL(FL11IN,R,L=QU*QUIDDL*3F4,D=HI) MOUNT QU FL 009 

REQUEST, FLU, N, HI. SCRATCH FOR NEW FLU 010 

LAEEL(FL11,W,L=GU*GUIDDL*3F4,D=HI) 011 

REWINC(FL11IN,FL11) 012 

UPCATE(F,F=FL11IN,N=PL11) 013 

COKPASSU=CCMFILE,B=QX,L = Q,S=IOTEXT,S=IPTEXT) 014 

SYMFL(I=CCMFILE,L=C,B=QX) 015 

COKPASSU = CCMFILE»B=QX,L = G> 016 

SYHPL{I=COHFIL£,L=C,8=QX) 017 

COhPASS(I=CCMFILE,B=QX,L=0J 018 

SYKFL(I=CCKFILE,L=G,B=QX) 019 

REWINC(QX) 020 

LDSET(LIE=SYSIC/NUCLEUS) 021 

LOAD(GX) GENERATION CF OVERLAY QU 022 

NOGC. 023 

REWINC(GC,GX) 024 

SKIPF(FLll,i,17) 025 

COFYEF(GL,FLil> CGFY BINARY FILE TO NEW PLII 026 

COFYEF(GX,FLll) 027 

REWINC(FLllIN) 028 

SKIPF{FL11IN,3,17) 029 

C0FYEF(PL11IN,FL11,3) COPY GUIDDL TO TAPE 030 

UNLOAD CPLllIN, FLU) 031 
7/8/9 ENO CF RECORD 

*/ ADD CORRECTIONS HERE 033 
7/8/9 END CF RECORD 
6/7/8/S ENC OF FILE 

QU2,CM55GGG,T7GG0,MTI. 001 

COMMENT. THIS JCB EDITLIBS THE QUERY/UPDATE BINARIES INTO THE RUNNING 002 

COKMENT. SYSTEM FROH THE PLII TAPE. EITHER THE RELEASED VERSION OF PLII 003 

COMMENT. OR THE VERSION CREATED BY DECK QUI MAY BE USED. 004 

LAEEL(FL11,R,L=GU*QUIDDL*3P4,D=HI) MOUNT QU PL 005 

REWIND, FLU. 006 

SKIFF(FL11,1,17) SKIP OLDPL 007 

COFYBF(FLll,QL) Q/U EINARIES 008 

REWIND, FLU, QU. 005 

UNLOACCFLli) 010 

EDITLIE(SYSTEH) 011 

COMMENT, *** END OF JOB *** 012 
7/8/9 END CF RECORD 

READY(SYSTEM) 014 

LIERARY(NLCLELS,OLD) 015 

REFLACE(*,GL,AL=3,FL=640 00,FLO=1) 016 

FINISH. 017 

COMPLETE. 018 

ENCRUN. 019 
7/8/9 ENO CF RECORD 
6/7/8/9 ENC OF FILE 
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VERIFICATION PROGRAMS 

The QU verification deck consists of three jobs which use the SCOPE Job 
Dependency option to control the order of execution. Since these are the same 
verification decks used by QUIDDL, QUIDDL must also be installed in the system 
before running the verification program decks. The first job (SCHEMA) creates 
a directory; the second one (AREA), an indexed sequential file; the third (QU) 
runs Query Update using the directory and the indexed sequential file. 

SCCFE 3.** 
G5.44.52.SCFEM35 

05. 44. 52. SCHEMA, T1GO,CM63000 ,D QUO 0. 
QS.kU. 52. REQUEST (TAPE5»*PF) 
05 .44.54.QUI00L(M=C,S=TAPE5> 
05.45.12. 3.082 RT SECONDS LOAD TIME 
05.45. 15. ( TAFE5 ASSIGNED TO EST 07 ) 
05. 45. 47. QUIDDL COMPLETE 
05.45.48.CATALCG(TAPE5,DOLDIRECT,I0=VERIFY,CY=i,C 

05.45.48.N=»---*,PW=* *) 

05. 45. 48. INITIAL CATALOG 
05. 45. 50. RF = 010 DAYS 
05.45.51.RETURMTAPE5) 
05.45.52.TRANSFCQU) 

05.45.53. TRANSFERRED TO QU00036 
05.45.53.FTN(L=0) 

05.46.54. 2.055 RT SECONDS LOAD TIME 
05.46.59. .243 CP SECONOS COMPILATION TIME 
05 .46.59.CCMFASS(L=0) 

05.47.03. ASSEMBLY COMPLETE. 46600B SCM USED. 

05.47.03. 1.427 CFU SECONDS ASSEMBLY TIME. 

05.47.03.MAFCCFF) 

05. 47. 04. ATTACH (TAPES, DDLDIREC T ,ID= VERIFY) 

05. 47. 06. PF CYCLE NO. = 001 

05.47.G6.LGO. 

05.47.34. 3.710 RT SECONDS LOAD TIME 

05.47.36. STOP 

05.47.38.CFA 3.646 SEC. 

05. 47. 38. FF 30.040 SEC. 
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SCCFE 3.** 
05.44.51.AREAG34 

05.44.51.AREA,T100,CM630 00,DQJQO. 
05. 44. 51. REQUEST (ALICE, *PF> 
Q5.44.52.FTN(L=0) 

05.44.54. 1.305 RT SECONDS LOAC TIME 

05.44.58. .186 CP SECONDS COMPILATION TIME 

05. 44. 58. COMPASS (S = IOTEXT,L=0> 

05.45.04. ASSEMBLY COMPLETE. 46600B SCM USED. 
05.45.C4. 1.A96 CPU SECONDS ASSEMBLY TIME. 

05.45.G5.MAF(OFF> 
Q5.45.05.LGO. 

05.45.13. 7.547 RT SECONDS LOAD TIME 

05. 45. 13. ( ALICE ASSIGNED TO EST 10 ) 
05. 45.16. FTN - FATAL ERROR 065 
05.45.18.JCE REFRIEVED 
05.45.18. SIS ERROR RECOVERY 

05. 45. 18. FOLLOWING FILES TO BE CLOSED BY SIS 
05.45.18. RECCVERY- 
05.45.18. ALICE 

05.45.20. (PREVIOUS ERROR CONDITION RESET) 
05. 45. 21 .EXIT. 
G5.45.2i.TRANSF(QU) 

05.45.23. TRANSFERRED TO QU00036 

05.45.23.CFA 3.142 SEC. 

05. 45. 23. PF 15.882 SEC. 



SCOPE 3*4 
05.45.54.QUC0036 
Q5.45.55.GU,T2C0,CM77 000*DQUC2. 
05. 45. 55. GU. 

05.46.07. 11.183 RT SECONDS LOAC TIME 

05.46.17. QUERY UPDATE SESSION COMPLETED 
Q5.46.18.REfcIN0(Fi,F2,F3) 
05.46.18.CCFYSEF(F1,OUTPUT1 
05.46.19.COFYS6F(F2,OUTPUT) 
05.46.20.COFYSEF(F3,OUTPUT) 
05.46.2G.REWINC(F3) 
05.46.21. GU. 

05.46.32. 9.336 RT SECONDS LOAO TIME 

05.46.41. GUERY UPDATE SESSION COMPLETEO 
05.^6. 41. CPA 2.816 SEC. 

05 .46. 41. PP 22.432 SEC. 
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QUIDDL VERSION 1.0 13 



GENERAL DESCRIPTION 

With QUIDDL, a data base administrator defines data in terms of its attributes 
and the relationships that exist and must be maintained, thus permitting users 
to store and retrieve data from secondary storage easily and efficiently. The 
data base consists of all records and areas in mass storage; they are 
described by a specific schema. The user, in combination with SCOPE 3.4 
features, has the ability to: 

Structure data physically in the manner most suitable to each application 
regardless of whether any portion of that data may be used for some other 
application as well. 

Control the physical placement of data. 

Declare a variety of data structures. 

Interact with data without concern for the mechanics of maintaining data 
structural associations. 

QUIDDL has routines written in SYMPL and COMPASS. 

RELEASE DESCRIPTION 

QUIDDL Version 1.0 runs under the SCOPE 3.4 operating system; it operates on 
the same minimum hardware configuration as SCOPE 3.4. 

RELEASE MATERIALS 

The Update program library for QUIDDL shares release tape PL1 1 with QU. 

A complete catalog of PL11 contents is included in section 1-12. 

LIMITATIONS 

\ directory cannot be compressed to eliminate wasted space if UPDATE mode is 
used. . 
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INSTALLATION PARAMETERS 

QUIDDL 1.0 will reference IP. CSET of IPTEXT in the running system at 
installation time to determine the exact character set. 

INSTALLATION PROCEDURES 

QUIDDL shares PL1 1 with QU. The installation decks refer to the release 
QUIDDL tape as P11A. 

To obtain the QUIDDL installation decks execute a program of the type: 

Job card. 
REQUEST (PL 11, E) 
SKIPF(PL11 ,11 ,17) 
C0PYBF(PL11,PUNCH,2) 
UNLOAD (PL1 1 ) 
6/7/8/9 

Deck QUDDL1 allows regeneration of the release tape incorporating changes to 
the program library file which will be reflected in the binary. Deck QUDDL2 
adds binary from either the released tape or a tape created by QUDDL1 to the 
running system. Once QUDDL2 has completed, job SCOPE3 (section 1) can be used 
to create a deadstart tape from the running system. 
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LOAD(LGO) GENERATION CF OVERLAY QUIDDL 023 

NOGO. Q l k 

REMNC (GLIODL) fl2 c 

REWIND (L GO) JJI 

SKIFF(F11A,4,17> Q27 

COFYEF<GLICDL,FliA) Q28 

COFYBF(LGO,FiiA) 02 g 

UNLCACCPiiA) 03Q 
7/8/9 ENO CF RECORD 

V ACC CORRECTIONS HERE Q32 
7/6/9 END CF RECORD 
6/7/8/9 END OF FILE 

QUCOL2,CM55Q00,T7Q0O,MTl. 001 

COMMENT* THIS JOB TAKES TAKES THE RELEASED VERSION OF QUIDDL, OR THE 002 

COMMENT. VERSION CREATED BY JOB QLODLi, AND EDITLIBS THE BINARY INTO 003 

COMMENT, THE RUNNING SYSTEM FROM FiiA. q Q l 

LA6EL<FliA,F,L=QU*GUIDDL*3P^,D=HI> MOUNT QUIDDL PL 005 

REKINCF11A. Qa l 

SKIFF(FiiA,<*,17> J 7 

COPYER(FilA,GLIDC,i) QUIDCL CONTROL CARD CALLABLE ROUTINE 008 

COFYBF(FliA,QLICO) QUIDCL OVERLAYS 009 

REKINC,P11A,QIIOC,QUIDO. Q10 

UNLOAC(PiiAl nil 

EOITLIE(SYSTEM) 012 

COMMENT. *** ENO OF JOB *** Q13 
7/8/9 END CF RECORD 

READY(SYSTEM) 015 

LIERARY(NLCLEUS,OLD) 016 

RE PLACE <»,GLICC,AL=3,FL = ^0 0,FLO=i) 017 

ct k. reu 

i x n j. o n • Q18 

LIERARY(SYSCVL,CLO) Q19 

REFLACE(*,QIIDC,AL=05 q 20 

FINISH* g 2 ^ 

COMPLETE. 022 

ENCRUN. Q23 
7/8/9 ENO CF RECORD 
6/7/8/9 ENO OF FILE 

VERIFICATION PROGRAM 

The QUIDDL verification decks are shared with QU. See the QU section of this 

document for description of the verification process. 
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INTERCOM VERSION 4.1 14 



RELEASE DESCRIPTION 

INTERCOM 4.1 in conjunction with the SCOPE 3.4 operating system provides 
Teletype and CRT terminals with time-shared access to CYBER 70 Series 
computers. Remote batch jobs may be submitted from terminals equipped with a 
remote card reader and printer, from a remote computer (1700 or 8231} running 
an IMPORT package, or from a High Speed Batch Terminal. Programs written in 
the RUN, FORTRAN Extended, COBOL, ALGOL, COMPASS, and BASIC languages can be 
submitted from a remote terminal for execution at control points; the user at 
the remote terminal can interact with the executing program. Program output 
can be routed to the line printer and card punch at the central site or to a 
terminal equipped with line printers or card readers. Through the SCOPE 
permanent file feature, input from a central site magnetic tape or card reader 
is available to the remote user. 

INTERCOM 4.1 further provides the capability for multi-user jobs to be written 
which can handle many users simultaneously with one copy of a program. The 
program- text editor, EDITOR, introduced in Version 3.0, utilizes this 
capability. 

HARDWARE CONFIGURATION 

In addition to the minimum hardware required by the SCOPE system, INTERCOM 4.1 
requires the following equipment for communication and operation. 

One of the following: 

CRT terminal, model 214-11, 214-12, 217-11, 217-12, 217-13, 217-14, or 

71 1-102, 

or a model 33 or 35 KSR or ASR Teletype terminal, or a 713 Teletype 

compatible terminal, 

or a 1700 or 8231 remote computer running an IMPOET package 

or a 733-10 High Speed Batch Terminal (HSBT) 

Also: A dedicated multiplexer on a dedicated channel 6671, 6676, 6673, or 
6674 (6671 for Teletype and/or CRT terminals; 6676 for Teletype terminals 
only; 6 673 or 6 674 for high speed connections to remote computer) 
Or: A dedicated 7077 Communications Station on a dedicated channel with a 
791 Local Communications Controller (LCC) for Teletypes and HSBTs. 

Also: Data Sets for communication between the remote terminal and central 
site: Teletype terminals require 103A Data Sets; CPT terminals require 
20 1A or 20 1B Data Sets, or CONTROL DATA 358 Transceivers; remote computers 
and HSBTs require 30 1E or 30 3 Data Sets and a TELPAK A communication line, 
or CONTROL DATA 358 Transceivers. 
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Hardware Options 

Teletype 

Paper tape reader/punch 



CRT 



HSBT 



Card reader: 224-11, 12, 13, or 14 
Line printer: 222-11, 12, 13, or 14 

Card reader (one additional) 733-120 

Line printer (up to three additional) 733-110 

Card punch 733-101 

Memory increment (if additional peripherals are used beyond the basic 

HSBT required options, single card reader and line printer) 733-140 

Data Set Adaptor 7 33-130 

CRT (16x80 or 18x64) 733-150 or 733-152 

The High Speed Import for the 8231 and for 1700 are discussed in separate 
sections of this Installation Handbook and hardware options are included in 
those sections. 

RELEASE MATERIALS 

INTERCOM Version 4.1 release material consists of a magnetic tape (PL12) 
containing the INTERCOM Version 4. 1 OLDPL as file one and installation decks 
as files two and three. 

MODIFICATIONS AND DEFICIENCIES 

New Features and Modifications 

INTERCOM Version 4.1 includes all the interactive commands of INTERCOM Version 
3.0 with the exception of SETUP, the filename facility (available through 
XEQ) , and B. All facilities offered by SETUP are available through the multi- 
user editor features of EDITOR. 

The remote batch commands of INTERCOM Version 4.1 are changed as follows: 

New Commands Description 

REP Repeat the printing of a file 

KILL Kill a job in execution or in the input queue 

RTN Return the file now printing to the output queue 

New Names Old Names 

REW AGAIN 

BSP AGAIN, N 

DIVERT OUTPUT 

The XEQ command, added in INTERCOM Version 4.1, makes available to the user 
many of the features of the new LOADER for SCOPE 3.4. It also adds greater 
consistency in the definition of an INTERCOM language. 
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The BRESEQ command, added in INTERCOM Version 4.1, allows the us P r tn 

"s^™d? BASIC program and gives him contro1 ° v - h - thf f-r: l 

reLte W ?700 r ard r 823 i ? compters?' ^^ ^ «™ «d 667, multiplexers and 

The izz driver in INTERCOM Version 4.1 is capable of supporting the LCC and 
High Speed Batch Terminals and Teletypes. FP g ne LLC and 

Teletype operation via both the 791 LCC and the 6671 or 6676 multiplexer 
differs from INTERCOM 3.0 as follows: multiplexer 

The left arrow ( *- ) no longer is used for backspacing. The backspace 
character (CTRL H) must be used. sacc^ace 

Logical lines longer than 72 characters can be entered via paper tape bv 
terminating continued lines with a LINE FEED as the firs? control 
character (LINE FEED, RETURN) and terminating the last physicafline with 
a carriage return as the first control character (RETURN, LINE FEED) 



Teletype code has been changed as follows: 









INTERCOM 3.0 


INTERCOM 4.1 






CDC 


CDC 


ASCII 












63 Character 


64 Character 


64 Character 


63 Character 


64 Character 






Graphic 


Display Code 


Display Code 


Disnfa" Code 




Display Code 






# 


65 


65 


60 


60 


60 






1 (apostrophe) 


64 


64 


61 


70 


70 






! (exclamation) 


71 


71 


62 


66 


66 






% 


76 


63 


63 


none 


63 






" (quote) 


60 


60 


64 


64 








(underline) 
















or<- 


none 


76 


65 


65 


65 






] 


62 


62 


66 


62 


62 






@ 


66 


66 


70 


74 


74 






? 


75 


75 


71 


71 


71 






[ 


61 


61 


72 


61 


61 






< 


72 


72 


74 


72 


72 






\ 


74 


74 


75 


75 


75 






— (circumflex ) or 
















t (on some TTYs) 


70 


70 


76 


76 


76 








63 


00 


00 


63 


00 
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Corrections 



All eligible PSR code for INTERCOM Version 2.0 or Version 3.0 published 
through PSR Summary 320 has been incorporated in Version 4.1. 

Limitations 

1. EDITOR commands input through the terminal cannot exceed 518 characters; 
the longest text line allowed by EDITOR is 510 characters. On the 
Teletype, data input to a user's interactive program can be of any length 

(subject to the limitations imposed by the size of the user's circular 
buffer) ; and it may be a full screen on the CRT. 

2. The following SCOPE commands are not allowed as direct INTERCOM commands, 
although they are allowed as part of a job created through EDITOR to be 
submitted subsequently for batch execution. REQUEST is allowed only for a 
permanent file device: 

CKP, RFL, DMPECS, RESTART, LIMIT, LOAD, LIBLOAE, SIOAD, CMLOAD, 
ECSLOAD, EXECUTE, NOGO, LIBRARY, RPACK, LABEL, and VSN. 

These commands should be given an access level of 7777B when a 
deadstart tape is made. 

3. When the CONNECT command (or CONNEC call) is used, the specified data is 
routed to or from the terminal each time the file is read or written. 
When simultaneous operations are to be performed, no more than one file 
should be connected to a terminal for interactive operations at any given 
time. 

4. Time must be entered into the SCOPE system prior to bringing up INTERCOM. 
INTERCOM will request a time entry if it has not been done. 

5. PASSWRD can be run while INTERCOM is up; normally, however, it should not 
be done as INTERCOM users may experience poor response to LOGIN, SEND, 
SITUATE while PASSWRD is running. 

6. A single copy of the PP multiplexer driver cannot service both BCD and 
ANSI 200 User Terminals. 

7. Teletype operation via the 791 LCC differs from Teletype operation via the 
6671 or 6676 multiplexer. 

Teletype interrupts (CTRL Z followed by the directive A or S) require 
a carriage return (RETURN) to complete the message before the 
interrupt is processed. If the continue message (CTRL Z RETURN) is 
input, interrupted output will continue at the next line; characters 
in the interrupted line will be lost. 

The delete line character (CTRL X) is recognized on paper tape. 

Physical lines longer than the width of the Teletype carriage cannot 
be entered. The message LINE TOO LONG will be issued and the user 
must re-type the complete line. 
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8. Paper tapes created under INTERCOM Version 3.0 will not run properly under 
Version 4. 1. 

9. Pending a modification to ;:7000 SCOPE 2.0, which should result from PSR 
S00848, the Q command does not distinguish between a parameter of the form 
6x and a parameter of the form 7x. 

The information returned for either form will be the same, and will be 
dependent on whether or not the 6000 running INTERCOM is the 7000 operator 
console as well. If it is, 6x and 7x will both perform as 7x is 
documented. Otherwise, they will both perform as 6x. 

GENERAL PROCEDURES 

Installation of a complete INTERCOM system requires establishing installation 
parameters and installing from the INTERCOM OLDPL. The card deck described 
later can be run at the central site to install INTERCOM. FORTRAN Extended 
4.0 and COMPASS 3.0 must be installed before INTERCOM 4.1 can be installed. 

CENTRAL MEMORY REQUIREMENTS 

The standard installation of INTERCOM Version 4.1 requires about 2000 
(decimal) CM/ECS locations for PP programs 1CI, 1BR, 1QP, MUJ, 3TT and all the 
3TT and 1CI overlays (except 3CU,3CX). In addition, the PP routine 1PT may be 
made CM/ECS resident to increase performance; 1PT is on periodic recall at 
control point zero. If the system has a heavy high speed remote batch 
utilization, 1XP and its overlays should be made CM or ECS resident. The LCC 
driver is not dedicated and enters timed recall at control point zero if 
activity is low* Therefore- 1ZZ and 9ZZ may be made CM/FCS resident as well 
as the HSBT remote batch processor 1LX and its overlays. These additions 
increase the total CM or ECS requirement to about 4500 locations. 

Whenever INTERCOM is in idle state, approximately 500 additional CM words are 
required for multiplexer tables and minimum empty buffer chains. 

INSTALLATION PARAMETERS 

To configure the INTERCOM system for a "articular installation; 

An equipment status table (EST) entry must be established for each 
multiplexer dedicated to INTERCOM. 

In CMR, a multiplexer table must be defined which contains subtables for 
each multiplexer dedicated to INTERCOM. 

The installation deck must contain an assembly for each variant of the low 
speed multiplexer driver required. 

Parameters in the INTERCOM common deck INTCOM may be changed to affect the 
characteristics of INTERCOM. 

Parameters in the EDITOR common decks IPFTN and IPCOM may be changed to 
affect the characteristics of EDITOR. 

Parameters in the multiuser job common decks MUJCOM and CMUJCOM may be 
changed to affect the characteristics of multiuser jobs (particularly 
EDITOR) . 
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INTERCOM COMMON DECK SETTINGS 

Release values are shown in the following list of INTERCOM parameters for the 
common deck INTCOM present on PL12. If these parameters are to be changed, 
the cards containing the proper code with the CEQU macro should be placed 
after an *INSERT INTCOM. 91 card and inserted into the first update record of 
the deck INTCM1 after card 035. Alternate tested values are shown in 
parentheses. 

IP.AABT CEQU 76B 

Display code for the character recognized by the multiplexer driver as an 
abort request. This value is for the 63 character set, and a 63B will be 
assigned for the 64 character set when it is selected. 

IP.CTCT CEQU 20 

Maximum number of 200 User Terminals at 2400 baud which the PPU multiplexer 
driver will attempt to service in one cycle. If this number is set too high 
and the 200 UTs are very active, an attempt may be made to service too many 
users in one cycle and retransmissions may be observed. If this number is set 
too low and more than this number of terminals are active, the polling rate at 
some terminals may be slowed noticeably. In general this number should not 
require change. 

The maximum absolute value which may be defined is 32; 32 is the maximum 
number of 6671 ports supported by one low speed driver. 

IP.CTCT4 CEQU 8 

Maximum number of 200 User Terminals at 2400 or 4800 baud which the PPU 
multiplexer driver will attempt to service in one cycle if at least one 4 800 
baud terminal is defined for this driver. The effect of this parameter is 
similar to IP.CTCT; it also should not require change. The maximum value 
stated for IP.CTCT is applicable here also. 

IP.HRCL CEQU 5 

Number of seconds delay (when 1WB is in recall) before taking over a PP to 
check if any terminals are attempting to establish communications. It 
represents, approximately, the maximum amount of time a user will wait after 
loading IMPORT before communication is established. 
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IP.HSYNC CEQU 7500B 

Number of communication cycles 1WB will wait for a sync acknowledge from 
terminal before causing error indication and retransmission. The value of 
this parameter will vary with the length of the longest transmission line 
attached to the highspeed multiplexer. 

The duration of a communication cycle is approximately 250 microseconds. The 
release value should be large enough to provide for the longest transmission 
line possible in the continental United States (3500 miles) . 

IP.HINFW CEQU 7500B 

Number of communication cycles 1WB will wait for first input word from 
terminal before causing error indication and retransmission. The value of 
this parameter will vary with the length of the largest transmission line 
attached to the high speed multiplexer. The value of this parameter is 
similar to IP.HSYNC and will vary accordingly. 

IP.HCRXT CEQU 100 

Number of consecutive retransmissions allowed a given terminal before ending 
communication with the terminal and attempting to restart from the initiate- 
communication phase. 

A single transmission generally requires between 10 and 250 milliseconds. 

IP.1LX CEQU 1 

If 1, one copy of 1LX will be called to process all LCC users. If 2, one copy 
of 1LX will be called for each LCC. 

IP. PRIX CEQU 3777B (7000B) 

Non-zero, indicates the priority given to input files read from remote site. 
If zero, priority will be taken from Job card. 
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IP.IACES CEQU 12 

Number of bits in the 11 -bit user table access field assigned for the user 
access level. The remainder will be used for permission bits. Both access 
level and permission bits are used to determine if a user has access to a 
specific utility or routine. 

When a request is made to use a command, the user's access level is checked to 
determine whether it is greater than or equal to the access level of the 
command. If it is, the permission bits of the user are compared against the 
permission bits of the command. If they match, the user is given access to 
the command. If either test fails, permission is not granted. 

Example: 

In a university environment all undergraduates are assigned access Level 5; 
therefore, all commands having an access level of 5 or less are available to 
the undergraduates. Only commands X, Y, and Z however, are available to 
members of the Computer Science Department. This may be controlled by 
assigning a portion of the access field to the access level with the remainder 
used for permission bits. Then such commands could be assigned a permission 
value of 3, which also would be assigned only to members of the Computer 
Science Department. 

IP. ID CEQU 1 

If one, the INTERCOM user id is used as the default permanent file id by the 
commands STORE, FETCH, and DISCARD. If zero, the permanent file id must be 
specified by the INTERCOM user. 

IP.IDFL CEQU 55000B 

Default field length assigned to a user's program, or any control card when 
field length override is specified in the library directory, and user has not 
entered a field length (EFL) . 

IP.IGCON CEQU 

Maximum number of 1700/274 Graphics consoles known to the system; should be 
set to zero if Graphics is not defined in the system. IP.IGCON has a maximum 
possible value of 24. 

IP.IGS CEQU (1) 

If one 1700/274 Graphics is defined as existing within the system; if zero 
1700/274 Graphics is not present in the system. 

IP.IHEAD CMICRO 0, (CONTROL DATA INTERCOM 4.1) 

Header output by 1PT when a remote terminal dials into the INTERCOM system. 
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IP.ISCRN CEQU 1 

Specifies the default size of CRT screens at the installation: if a 13 x 
80 screen is assumed; if 1, a 50 x 20 screen. ' 

IP.MALOC CEQU 4000B 

A 12-bit octal value defining the allocation style for files created by a 

multi-user job. Bit 11 always is set to one to indicate that a permanent file 

device is requested. The bits indicating the allocation style are bits 5-0 

This value is placed in the File Name Table entry generated for new multi-user 

job files, in byte C. FALLOC. 

IP.MPRIT CEQU 4000B 

Priority of output files directed to the central site by the remote batch 
command DIVERT. 

IP.N6671 CEQU 2 

Number of 6671 multiplexers for which the driver is assembled. 0,1, or 2 No 
individual driver can support more than 2 multiplexers total. 

IP.N6676 CEQU 

Number of 6676 multiplexers for which the driver is assembled. 0,1, or 2. if 

set to 2, IP.N6671 must be set to zero. Refer to the section on the 

Installation of INTERCOM for a further discussion on the required settinos for 
these two parameters. 

IP.N791 CEQU 3 

Kiel jCiifUJlIfi n"01c©i Oi LCC S P63T Oxl&TlTlQj. wrr&*t ^x}€ XjCC ^rxv^i* C3Fi ^I'i'ftrw^f^ • 1 O /x»* 
i • 

IP. TILL CEQU 55B 

An illegal character input from Teletype will be converted to IP. TILL. 

IP.TSL CEQU 10B 

Default time limit in seconds for execution of a user's program, if the user 
has not entered a time limit (ETL) . 

IP.1PT CEQU 1 

1PT will not be called if this parameter is set to zero; if set to 1, 1PT will 
be called only if CRT terminals are configured. If set to 2, 1PT will always 
be called when low speed multiplexer drivers are called. 
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CROSS REFERENCE LISTING 

The following cross-reference listing shows the routines that reference ead 
IKTCOM symbol: 



INTCOM 

I3.AA3T 

I^.CTCT 

IP.CTCy* 

I 3 ^RCL 

T 3 .HSYMC 

I 3 .HINFrf 

I=>.HCRXT 

I=>.1LX 

IO.PRIX 

I=».IACFS 

I 3 . 10 

IP.IOFL 

T3.IGC0N 

I=>.IGS 

I'.IHEAO 

I=>.ISCRN 

I^.MALOC 

IP.MPRIT 

IP.M6671 

IP.N6676 

IP.N791 



IP. TILL 

I^.TSL 

IP.1PT 



LOGIN 



8ZM 


9ZM 


IZM 




iZM 


8ZM 


1WB 




1W0 




1WB 




1W3 




1LX 


111 


iXP 


1LX 


1CI 




ST-ORBEG 


DIS! 


1CI 




111 


3 3 J 


1XP 


1CI 


1CI 




FAO 




1XP 


1LX 


iZM 


8ZM 


IZM 


3Z*1 


IZM 


8Z1 


3TT 


13R 


PNT 


IJ 3 


2GJ 


1GR 


8ZM 




1CI 




ill 





1PT 
FET3EG 

GEJ 

111 



1CI 
9ZM 
9ZM 
9ZM 
1QP 
IAP 
IUIO 



13J 
GBJ 



IDS 



2SJ 
GEJ 



T3L 



13R 
13J 



ZGJ 



1GR 



IX? 


1LX 


1^3 


OZZ 


13M 


1PT 


110 


1IM 


*ES 


MUJ 


HAC 


FAO 


STCRBEG 


DIS3EG 


PiTBEG 





1ZZ 

IDS 
G3J 



1CI 
T76 
GEJ 



TBS. 
13J 
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SCOPE IPARAMS SETTINGS 

These parameters must be set at *INSERT IPARAMS. 15 when SCOPE 3.4 is installed 
(deck SCOPE1) . 



IP. ILCMD 



CEQU 



If set to 1, the last word in the user table (W. IINS reserved for the 
installation) will store the last command entered by each user for display on 
the DSD Q display. If 0, it will not be used for this purpose. 



IP.IUSID 



CEQU 



2RAH 



Defines the first user id available for assignment by the program PASSWRD. 
The value of this parameter is determined by the number of highspeed 
multiplexers with sub-tables defined in the system and the number of HSBT 
terminals defined in the system. The highspeed multiplexers use two id's per 
6673 or 4 id's per 6674, starting with user id AB. The LCC's use one id per 
HSBT line defined in the LCC mux subtables. 

This user ID is the lowest available to be assigned a user at a lowspeed 
terminal. Every 1700 or 8231 remote highspeed batch terminal connected to the 
system must have its own user ID assigned to it. 



IP. 1M1 



CEQU 



Maximum number of active low speed multiplexer drivers allowed in the system 
simultaneously. Should be zero if the system has no 6671 or 6676 
multiplexers. The setting never should exceed three. This entry is dependent 
on the number of channels configured for use by low speed multiplexer drivers. 
One copy of a driver may service only one channel. 

IP.1WB CEQU 2 

Maximum number of active highspeed multiplexer drivers allowed in the system 
simultaneously. Should be zero if the system has no 6673 or 6674 
multiplexers. The setting never should exceed two; it is determined in the 
same manner as IP.1M1. 



IP.1ZZ CEQU 







Maximum number of active LCC drivers allowed in the system simultaneously. 
Should be zero if system has none; it should never exceed two. 
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EST ENTRY 

The EST table established when deck SC0PE1 is run to install SCOPE3.4, must 
contain an entry for each multiplexer dedicated to INTERCOM. The channel 
referenced in this entry must be dedicated to the INTERCOM multiplexers on 
that channel. A separate copy of the driver in a dedicated PP is required to 
service each channel assigned to INTERCOM. For non-allocatable equipment, the 
EST uses the 6 000 macro which has been modified as follows: 

type 6 00 channel, sync, unit ,onof f ,i point 

Macro parameters used by INTERCOM: 

type DC for 6671, YC for 6676, SC for 6673 or 6674, CS for 791 

channel Channel for multiplexer or 7077 Communication Station 

sync Equipment number for multiplexer or 7077 SAC/CSM I/O channel for 
791 

unit Not used by INTERCOM 

onoff Switch, on = 0, off = 1 

ipoint Index to INTERCOM multiplexer table 

A typical EST entry might appear as follows: 

*I CMR.2108 

DC 6000 3,5,0,0,MUX1-T.ITABL 

This entry notifies the multiplexer driver that a 6671 with equipment number 5 
is on channel 3; and the index to the multiplexer table is MUX1-T.ITABL, where 
MUX1 is the symbol on the card defining the multiplexer subtable for this 
6671, and T.ITABL is the beginning of the multiplexer table. 

Typical EST entries for two LCC 791's on SAC/CSM channels and 1 connected to 
a 7077 connected to channel 4 would appear as follows: 

CS 6000 4,0,0,0,MUX2-T.ITABL 
CS 60 00 4,1,0,0,MUX3-T.ITABL 
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CONFIGURATION PARAMETERS (INTERNAL TO CMR) 

This parameter defines the length of the INTERCOM multiplexer table. It must 
be set at * INSERT CMR. 964 when SCOPE 3.4 is installed. The default value is: 

L.ITABL CEQU 19 

This parameter should be changed to reflect the size of the multiplexer table 
for each installation. The length of the table can be determined from the 
following formula: 

L.ITABL = 2+2*N76+N71+N71PORTS+N73+N74+NG+2*N91+N91PORTS 

N76 number of 6676 multiplexers dedicated to INTERCOM 

N71 number of 6671 multiplexers dedicated to INTERCOM 

N71P0RTS total number of 6671 ports defined 

N73 number of 6673 multiplexers dedicated to INTERCOM 

N74 number of 6674 multiplexers dedicated to INTERCOM 

NG number of 6673 or 6674 multiplexers defined for 

GRAPHICS support 

N91 number of 791»s 

N91 PORTS total number of 791 ports defined 

CMR MULTIPLEXER TABLE 

The CM resident INTERCOM multiplexer table is used by INTERCOM to provide data 
on the hardware configuration of the installation and to record parameters. It 
consists of two dedicated parameter words and one or more subtables assigned 
to the multiplexers serviced by INTERCOM. 

The first two words of the multiplexer table, the parameter words, start at 
location T. ITABL in CMR. They are already assembled into CMR. The subtables 
follow the parameter words in any order convenient to the installation. The 
first subtable must be defined at *INSERT CMR. 2238 when SCOPE 3.4 is 
installed. Each subtable has a relative pointer in the EST entry for that 
multiplexer. The upper bound of the multiplexer subtable may not extend 
beyond 7777B. 

CMR MULTIPLEXER SUBTABLE GENERAL FORMAT 

Each multiplexer subtable contains one entry to define the type of 
multiplexer, one entry for each port defined on that multiplexer if a 6671 or 
a 791, or a single entry if a 6676, or no further entries if a 6673 or 6674 
does not support graphics consoles or a single entry if a 6673 or 6674 
supports graphics consoles. The address of the entry describing the 
multiplexer is the same address used in the EST entry defining that 
multiplexer. A subtable for a 6671 multiplexer might be defined as follows: 

MUX1 MUX71 4 
CRT 
CRT 
CRT 
TTY 



60307400 1-14-13 



When a 6671 multiplexer is configured it is advisable to place the highest 
speed terminals on the lowest ports and to place any empty ports at the high 
number port positions. Thus, the 6671 should be configured 4800 baud 
terminals first, the 2400 and 2000 baud terminals, then TTY's, then empty 
ports. The MUX71 macro port count parameter can be set to exclude the empty 
ports and increase driver efficiency. This saving is especially important 
when a driver is to support both a 6671 and a 6676. 

A subtable for the 6673/6674 multiplexer might be defined as follows: 
MUX4 MUX73 0, 3, G 

The mux is defined with terminals attached to ports and 3, and it also 
is described as capable of graphics support. 

MULTIPLEXER DEFINITION ENTRIES 

INTERCOM recognizes four types of multiplexers, the 6671, 6676, 6673 and 6674, 
and one type of communications subsystem, the 791 (LCC) . They are defined 
with the following macros: 

MUX71 no. of ports 

MUX76 no. of ports 

MUX73 P0,P1,G 

MUX74 P0,P1,P2,P3,G 

MUXLCC No. of ports, memory size 

The parameter (number of ports) indicates the highest numbered port + 1 which 
INTERCOM is to service. For the 6673 and 6674, the parameters Pi are the port 
numbers which are attached to the multiplexer. The parameter G, if specified, 
is the letter G and designates this multiplexer as being defined for Graphics 
support. The memory size parameter for the LCC indicates the size of the LCC 
memory. It should be either the characters 4k or 8k. If omitted 8k is 
assumed. A 66 71 with ports 0, 1 and 3 attached to data sets should be defined 
as: 

MUX71 4 
A 791 with ports 0, 1, and 3 attached to data sets should be defined as: 
MUXLCC 4 

Since a 6676 multiplexer can have only TTY ports, the MUX76 macro does not 
require port definition entries. The MUX73, MUX74 , and MUX76 macro generate 
all multiplexer subtable entries necessary to completely define the 
multiplexers. 
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PORT DEFINITION ENTRIES 



TTY 

CRT 

CRTA 

CRT4 

CRTA4 

EMPTY 



Teletype Model 33 or 35 or CDC 713 

BCD CRT or 200 User Terminal, 2400 baud 

ANSI CRT or 200 User Terminal or CDC 711 2400 baud 

BCD CRT or 200 User Terminal, 4800 baud 

ANSI CRT or 200 User Terminal or CDC 711 4800 baud 

EMPTY Port (not serviced by INTERCOM) 



full duplex mode. De °P erated «* "800 baud must operate in 

servicinf uo^al dSp ^le^c^^slte ± S2 ±Ca *- ^ the <>° tts a " 
not on party lines are .-SKo"^*^* 3£ ?N&£SI".£f J 1 * 1 :? ° RTS 
be set manually to zero at the terminal tV? ™ ^TERCOM system. They must 
wired and party-line connection^ hC" .^- Possible also to define hard- 
definition macros as LscrSef bellw. * n9 P arameters to any of the CRT 

deflned^fh t°he Foll^^ltT^ * ^ CMR ■"" f ° r *" "*■ Th ^ a " 

TTY Teletype model 33 or 35 or CDC 713 

LSBT Low Speed Batch Terminal 

MSBT Medium Speed Batch Terminal 

HSBT High Speed Batch Terminal 

EMPTY Empty port (not processed by INTERCOM) 

^h's^rdl^ch^rm^^hererorer^sT tSef teJmLaT't" 6 "™' ««"« I 
supported with this initial release of INraRCOM^?*. teminal ^ es are »ot 
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PORT DISTRIBUTIONS FOR LOW SPEED MULTIPLEXERS 



1 

MULTIPLEXER 


HARDWARE LIMITS 


SOFTWARE LIMITS 




CONFIuUnA MUIM 
One PPU 


200 UTs 


TTYs 


2400 Baud 
200 UTs 


TTYs 


4800 Baud 
200 UTs 


TTYs 


6671 


16 




16 




16 






16 




16 




16 


2X6671 


32 




28-32 




Not 
Supported 




1R 


16 


14-16 


16 


Not 
Supported 


Not 
Supported 




32 




32 




32 


6676 




64 




64 




64 


2X6676 




128 




100-128 




100-128 


6671, 6676 


16 


64 
80 


16 


64 
80 


10-12 


25-40 
80 



The chart indicates the hardware limitations for each low speed multiplexer conf.gurat.on. The* I— s 
Ihow he maxirnum number of 200 UT ports that can be defined and, the ^x-mum number of TTY ports 
that can bT defined. Each 200 UT port can be a party-line port and support more than one 200 UT. 

For each hardware configuration, the chart indicates the best estimates of what the software will support 
satisfactorily. Under heavy loads, terminals may suffer some degradation. 
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PARTY LINES 

Any of the CRT definition macros may be used to define party-line 
configurations by adding parameters to the macro call. The general form is: 



CRT 



sa0,sa1, . . .sa15 



A list of site addresses indicates the port is to service a party- line to 
which terminals at those site addresses may be connected. Up to 16 site 
addresses, to 17B, may be specified. The macro will stop scanning after the 
16th parameter, or at the first null parameter. Site addresses may be 
specified in any order. 

For example, a BCD 2400 baud CRT or 200 User Terminal party-line with six 
possible site addresses might be defined as follows: 

CRT 5,1,0,10,15,6 

HARD-WIRED CONNECTIONS 

Because of the way INTERCOM handles hard-wired (non dial-up) terminals, they 
must be specified as party-lines with only one site address (usually zero for 
only one terminal; however, the site address specified in the macro should 
match the site address of the terminal) . A terminal connected to a 6671 with 
Control Data 358-2 transceivers should be defined as follows: 

CRT 

Example: 

A system with two multiplexers, an LCC, and a number of different types of 
terminals might be defined as follows: 

EST Entries: 

DC 6000 3,0, 0,0,MUX1-T. ITABL 
YC 6000 3,1,0,0,MUX2-T.ITABL 
CS 6000 4,0,0,0,MUX3-T.ITABL 

Multiplexer Table: 



T . ITABL 


VFD 


6/1LA, 6/0, 12/0,36/0 




VFD 


60/0 


MUX2 


MUX76 


10B 


MUX1 


MUX71 

CRT 
CRT 


12B 




CRT 







CRT 







CRT 







CRT 







CRT 


0,1,2,3 




CRT 


4,5,6,7 




EMPTY 






TTY 




MUX3 


MUXLCC 
HSBT 
TTY 
TTY 


3 


MUX4 


MUX73 


0,3,G 
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GRAPHICS MULTIPLEXERS 

A 6673 or 6674 multiplexer may be designated as a GRAPHICS multiplexer by 
inclusion of the G parameter. In this case the GCON macro should be specified 
immediately following. This macro has the following form: 



GCON 



pO, p1, p2,... p23 



The pi are GRAPHICS console numbers defining the 274 consoles attached via 
this multiplexer. In the 2-digit console number, the first digit designates 
the port through which this console is accessible, or 1 for 6673, 0, 1, 2 or 
3 for 6674; and the second digit designates the console number on a particular 
remote system 0-6. 



LCC PROGRAMS 



The INTERCOM 4.1 LCC initializer uses the LCC multiplexer subtables to 
determine which variants of the LCC programs to load before the LCC driver is 
brought up. INTERCOM 4.1 assumes the proper variants are available on the 
SCOPE system library and are disk resident. The following table indicates the 
names of the LCC programs that the LCC initializer will search for. 



LCC memory size 


8k 


4k 


HSBT ports only defined 
Teletype ports only defined 
HSBT and Teletype ports defined 


OZD 
OZF 
OZJ 


OZE 
OZG 
OZK* 



Configuration 
not supported 
by LCC programs 

In addition the LCC autoload program OZA must also be available on the system 
library and be disk resident. 

kll these programs are available in binary format as part of a separate 
release of the LCC programs. They may be added to the running system using 
the following job: 

Job card. 

EDI TLIB (SYSTEM) 

7/8/9 

READY (SYSTEM, OLD) 

REPLACE (*, INPUT) 

COMPLETE. 

END RUN. 

7/8/9 

Binary decks of LCC programs 

6/7/8/9 
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DRIVER TYPE SELECTION 

If the variant of the low speed driver which supports BCD 200 User Terminals 
(2400 baud) and Teletypes on the 6671 multiplexer only is not required, card 
number 40 must be changed to *DEFINE TYPEx, where x is A to N determined from 
the following table. Find the column containing the combination of Y's which 
corresponds with your equipment configuration, then obtain the letter x from 
the bottom row. Any equipment configuration not included on the chart is 
either an impossibility (e.g., CRTs on a 6676), or it contains more terminal 
types than can be supported by one variant of the driver (e.g., both BCD and 
ANSI 2 00 UT) . 



IP.N6671/*0 


YYYYYYYYYYYYY YYYYYYY 


IP.N6676*0 


YYYYYYYY 


BCD 200 UT(2400 baud) 


Y Y Y Y Y Y 


TTY 


Y YYYYYYYYYYYYYY 


BCD 200 UT(4800 baud) 


Y Y Y Y Y Y 


ANSI 200 UT(2400 baud) 


Y Y Y Y Y Y 


ANSI 200 UT(4800 baud) 


Y Y Y Y Y Y 


X 


ABCCDEEFGGHIIJJKLLMNN 



Each hardware channel dedicated to INTERCOM is serviced by only one copy of 
the driver in a dedicated PPU. In general, a different variant of the driver 
is required for each hardware channel dedicated to INTERCOM with either a 
different multiplexer mix or a different terminal mix supported. There are 
two exceptions: As indicated in the table, the driver variant which drives 
CRTs at both 2400 and 4800 baud is the same variant which drives CRTs at 4800 
baud only; whereas the driver which only drives CRTs at 2400 baud requires a 
different variant. Likewise, the same variant which drives TTYs on the 6671 
and 6676 multiplexers also drives TTYs on the 6676 multiplexer alone; whereas 
the 6671 alone requires a different variant. Thus, if an installation has .two 
channels dedicated to INTERCOM, one with a 6671 and a 6676 and the other with 
a single 6676, and only TTYs are supported, only one variant of the driver 
need be assembled, variant J. 

Note that only differences in the type of multiplexers supported, and not 
differences in the number of multiplexers supported, will require different 
variants of the driver to be assembled for different channels. However, the 
symbols IP.N6671 and IP.N6676 must be set to the number of multiplexers of the 
given type on the channel with the greatest number of that type multiplexer. 
In the example of the preceding paragraph, the J variant of the driver should 
be assembled with IP.N6671 set to one and IP.N6676 set to one. Similarly, an 
installation could assemble a variant of the driver with IP. N6676 set to two, 
even though only one 6676 is to be supported. 
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For each additional variant of the low speed driver required, the following 
cards must be inserted in the installation deck INTCM1 (see Installation 
Procedures, page 1-14-35). 

After card 017 

UPDATE(P=PL12,C=COMPx,Q) UPDATE DRIVER 1 Zx 

COMPASS (I=COMPx,S=PPTEXT,S=IPTEXT,L=0) ASSEMBLE DRIVER 1 Zx 

After card 046 

♦I DENT YYYYYx 

♦DEFINE TYPEx 

♦INSERT INTCOM.91 

♦/ 

♦/ INCLUDE INTERCOM 4. 1 INSTALLATION PARAMETER CHANGES HERE 

♦/ INCLUDING REDEFINITION OF IP.N6671 AND IP.N6676 IF NEEDED 

♦/ 

♦COMPILE 1M1 

7/8/9 END OF RECORD 

| where x is one of the above. 

The UPDATE deck name for the low speed driver is 1M1, however, each variant of 
the driver produced will have a different name of the form 1Zx where x is a 
character from A through N indicating the terminal mix supported by that 
driver. (The character x will correspond to that used on the ♦DEFINE card.) 
Similarly, the driver* s overlays, 8Zx and 9Zx, will have names indicating the 
terminal mix supported. 

When INTERCOM is first initiated, the INTERCOM initialization routine, 111, 
initiates the drivers as dictated by the multiplexers defined in the EST and 
the port definitions defined in the multiplexer subtables. If all equipments 
(multiplexers) on a channel are turned off when INTERCOM is initiated, no 
driver will be initiated to service that channel; however, the multiplexer 
subtables for all of the equipments will be examined and initialized by 111 . 
If some (but not all) of the equipments on a channel are turned off when 
INTERCOM is initiated, the variant of the driver initiated will be the same 
as if all equipments were turned on. The multiplexer subtables of all of the 
equipments, on or off, will be read and initialized. 

The user should make certain that only one EST entry points to each 
multiplexer subtable whether the equipment is on or off. 

Installation deck INTCM1 also will compile the relocatable multi-user job 
subroutines (deckname MUJSUBS) . Deck INTCM2 will not add them to the running 
system for reasons of size and expected infrequency of use. MUJSUBS always 
must be included on the COMPILE file, however, when EDITOR IS compiled and 
loaded, so that references to the muj subroutines from EDITOR will be 
satisfied. If a full UPDATE is done, the subroutines will be included on the 
COMPILE file. If an UPDATE, Q is done and the EDITOR is to be modified, the 
UPDATE input must include a ♦COMPILE MUJSUBS. (EDITOR does not use FTNMUJ or 
COBOMUJ, the decknames for the FORTRAN Extended and COBOL muj preprocessors.) 



1-14-20 60307400 C 



After the password files are established and the time has been initialized, 
INTERCOM should be brought up at control point zero with the console type- in 
INTERCOM. The INTERCOM system will be ready to service remote terminal users. 

COMMAND TABLE STRUCTURE (1CI OVERLAY 3CT) 

Prior to INTERCOM installation, release values in the command table of 3CT may 
be changed to add a new command or multi-user job. These modifications are 
accomplished with the BATCH, TABLE, and MUJ macros, and should be installed at 
1CI.4173. 

BATCH MACRO 

The BATCH macro is used on all remote batch commands such as READ, GO, etc. 
Macro format: 

BATCH name, ordinal, overlay, level, perm 

name Name of remote batch command 

ordinal Command ordinal (within overlay specified by next parameter) 

overlay Overlay of 1CI containing command 

level Access level 

perm Permission bit value 

TABLE MACRO 

The TABLE macro is used for commands other than batch type which require 
special processing. Otherwise, placing them in the NUCLEUS directory is 
sufficient. 

TABLE name, level, FL, TL, ,,PERM 

name Name of command 

Level Access level 

FL Field length required 

TL Time limit (in power of two seconds) 

PERM Permission bits for access to command (not used in release 
version) 
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MUJ MACRO 

This macro defines a table entry for multi-user jobs such as EDITOR. If a new 
multi-user job is added by the installation, the MUJ macro must define a table 
entry in the 3CT table. A corresponding entry also must be made in the 1QP 
MUJTABL to completely define a muj (refer to the description of the 1QP table 
below) . MUJ macro format: 

MUJ name, ordinal, over lay, level, perm 

name Name of muj (each defined muj must begin with a different 
letter, as this letter is used as part of the muj id and 
must be unique) 

ordinal Command ordinal (within overlay specified by next parameter) 

overlay Section of 1CI containing code to process muj 

level Access level 

perm Permission bit value 

In addition to the MUJ macro, the following cards must be inserted in the 
overlay 3CT for each muj added by the installation: 



*J.Nfc>£KT 


iCi. 4u"y^ 




LJM MUJn 


♦INSERT 


1CI.4214 


MUJn 


LDN 1QP muj ordinal 




UJK PROMUJ 



The first *INSERT places an entry in the jump table in 3CT. The position of 
the LJM instruction in the jump table constitutes the command ordinal as 
specified in the MUJ macro. For the EDITOR, this ordinal is 4; the next 
available entry to be added would be 8, and so on. The second *INSERT adds 
code for loading the 1QP rouj ordinal (position of this muj in 1QP MUJTABL) and 
for jumping to process the request. 
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MUj Table ^Structure ( 1QP) 

Each multi-user job as defined in the command table of 3CT also must be 
defined m the muj table of 1QP, MUJTABL, The position of ,an entry in MUJ.TAEL 
is defined as the 1 Qp muj ordinal. Entries are made with the macro MUJTEL, 

MTJJTBL name, fl,swpin,swpout, editor 
name Name of the muj 

f l Field .length of muj (actual value) 

swpin Delay, in TCI cycles (depends on TP..TICX, released for 1/2 

second),, between discovery of need to swap :in the muj and actual 
entry into the scheduling gueue. This value increases response 
time to. muj xeguests (when the muj is swapped out) but allows 
re guests to accumulate:; so that when the muj is in, it is more 
likely to process mul-tiple users. Maximum iaf 4095. 

swpout Delay, in 1.d cycles, between discovery of need -to swap out muj 

and actual swap out. A high value setting essentially dedicates 
the muj at a control point. 

editor 1 muj EDITOP. 

otherwise 

The parameters swpin, swpout, and editor may be null, and default values 1, C 
and ■ .0* ;respec±ive:ly, will be assumed. 

Table Changes and Release Bettings 

Changes to the tables in routines 3CT ;and 1 Qp should be included ir the UPDATE 
record at card 044 of the installation deck TNTCM1 . The following list shows 
the release values and UPDATE identifiers. 



T8EG 


,:EQ.U 


* 




MUJ 


EDIT0R,4-8SP,;: 




TABLE 


CATALOG, 0, 2 OB 




TABLE 


ATTACH,.!, 20 B 




TABLE 


PURGE, 0,208 




TABLE 


EXTEND, L,20B 




TABLE 


RENAME, 1,20B 




TABLE 


ALTER, 1,2 03 




TABLE 


S€TP,l,2 0e 




TABLE 


HOQE,1,;10B 




TABLE 


PAGE,1,40 0B,7 




BA T CH 


TAPE,1,8SP 




CATCH 


LOOK, 2,8 SP 




BATCH 


5AV£FL,.3,8SP 




BATCH 


REDUCE, 6,8SP 




BATCH 


nMP,5,8SP 




TABLE 


MAP, 1,108 




BATCH 


!M£>0RT,7,8SP 


=>N 


EQU 


3 


'CM 


mu 


14 



:NJ OF PAUSE TYPE COMMANDS 



LCI 




i:i 


4L14 


LCI 


4115 


LCI 


■M'15 


LCI 


4117 


LCI 


4118 


LCT 


4119 


LCI 


412 


.1.31 


4121 


LCI 


4122 


LCI 


4123 


LCI 


4121* 


LCI 


41 2 5 


LCI 


4125 


LCT 


4127 


ICI 


4121 


LCT 


4129 


LCT 


413 


LCI 


4131 


ICI 


4132 


ICI 


413 3 


1CI 


4134 
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BEGINNING OF COMMAND BATCH TYPE ONLY 





BATCH 


S,CN+13,2CX 




BATCH 


G,PN,2CX 




BATCH 


R,CN+1,2CX 




BATCH 


E,PN+10,2CX 




BATCH 


C,CN + i»,2CX 




BATCH 


P,PN+6,2CX 




BATCH 


0,1, 2CX 




BATCH 


i)R0P,i,2CX 




BATCH 


SWITCH, 2, 2CX 




BATCH 


G0,PN,2CX 




BATCH 


H,PN+1,2CX 




BATCH 


COMMENT, PN+2.2CX 




BATCH 


EFL,PN+3,2CX 




BATCH 


ETL,PN+<t,2CX 




BATCH 


DIVERT, PN+5,2CX 




BATCH 


PRIOR, PN+6,2CX 




BATCH 


EVICT, PN+7,2CX 




BATCH 


KILL,PN+8,2CX 




BATCH 


M,PN+9,2CX 




BATCH 


MESSAGE, PN+9,?CX 




BATCH 


SCREEN, CN.2CX 




BATCH 


READ,CN+1,2CX 




BATCH 


ENO,PN+10,2CX 




BATCH 


REW,CN+3,2CX 




BATCH 


8SP,CN+3,2CX 




BATCH 


REP,CN+5,2CX 




BATCH 


RTN,CN+6,2CX 




BATCH 


WAIT,CN+7,2CX 




BATCH 


DSP,CN+8,2CX 




BATCH 


0FF,CN+9,2CX 




BATCH 


ON,CN+10,2CX 




BATCH 


REVERT, CN+li,2SX 




BATCH 


OFFLINE, CN+12,2CX 




BATCH 


SUP,CN+1^,2CX 




BATCH 


SUSPEND, CN+13,2GX 




BATCH 


C0NTIN,CN+h,2CX 




TABLE 


QU,1,500B,7 


TEND 


EQU 


* 


♦CALL INTCOM 




MUJTA8L 


BSS 







MUJTBL 


EDITOR, 1*0000, 0,2 




END 





DEFINE BEGINNING OF TABLE 



1CI 


M35 


1CI 


M35 


1CI 


M.37 


131 


M38 


1CI 


<fl39 


1CI 


klkQ 


1CI 


<flM 


1CI 


UkZ 


1CI 


kf*3 


1CI 


klkk 


1CI 


kli*5 


1CI 


klkb 


1CI 


>*lk7 


1CI 


klkS 


ICI 


kli*9 


ICI 


*fl5 


1CI 


<*151 


ICI 


1*152 


1CI 


M53 


1CI 


'♦is'* 


iCI 


<»155 


1CI 


<fl56 


ICI 


t*l57 


ICI 


M58 


ICI 


«»159 


ICI 


<fl60 


ICI 


M.61 


ICI 


1*162 


ICI 


^163 


ICI 


klbk 


ICI 


«fl65 


ICI 


^165 


ICI 


<*1S7 


ICI 


M68 


ICI 


«fl69 


ICI 


<*170 


ICI 


t*i7 1 


iCI 


Hi 7? 


ICI 


<fi73 


iCI 


^17i* 


1QP 


597 


1QP 


593 
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6 000 OPERATOR CONSOLE COMMANDS 

The following commands and one special display (Q) are available to the 6000 
operator to aid in his control of the INTERCOM environment. Full details may 
be seen in the SCOPE Operator's Guide. 



DIVERT 



ILOCK 



Diverts file or files to and/or from remote and/or central. 
Prevents users from logging into INTERCOM. 



INTERCOM. Activates INTERCOM (other variants to activate one part of 

INTERCOM) . 

I UNLOCK Cancels ILOCK condition. 

M, ID, MESSAGE Sends message to INTERCOM user id. 

The Q display, an INTERCOM display, exists in DSD. This display indicates the 
operating environment of INTERCOM and lists all logged in users along with 
their status and current activity. For a complete description of the operator 
commands and the Q display, refer to the SCOPE Operator's Guide. 
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MUJ SYSTEM ERRORS 



INTERCOM multi-user jobs (e.g. EDITOR), upon encountering hardware ana/or 
software errors, produce diagnostic dumps. These dumps contain a header MUJ 
SYSTEM ERROR xx. This message is sent to the system dayfile and to each user 
currently using the muj. Values of xx less than 50 indicate error conditions 
encountered by the system muj subroutines; values 50 or greater denote 
errors detected by the multi-user job itself. 

Error 

User area lost internally 

User area lost internally 

Bit KWCOM should not be set for this value of 
MMACT (FATAL) 

Error (from CIO) on last user area swap 

Illegal CIO function code on last user area swap 
(FATAL) 

User area lost on swap- out (FATAL) 



Number 


Issued Bv 


1 


USER 


2 


SERVICE 


3 


SERVICE 


4 


SWAPOK 


5 


SWAPOK 


6 


SWAPOK 


7 


not used 


8 


not used 


9 


USER 



10 



17 

50 

51 
52 



USER 



11 


USER 


12 


USER 


13 


USER 


14 


LUNSRCH 


15 


not used 


16 


USER 



USER 

SYSERR 

SYSERR 
WRTPRN 



Muj returning user area not assigned to it. 
(User error) (FATAL) 



Invalid ACTN code sent by 
(FATAL) 



muj (User error) 



Invalid information from 1QP 

Internal logic error 

A non-ready user was marked as ready 

Logical unit number was specified in call to 
USERFO, but corresponding file was not declared 
on muj PROGRAM card (User error) (FATAL) 



Muj is returning user not assigned to it. (User 
error) (FATAL) 

User's files cannot be returned when user leaves 
muj 

One of various EDITOR errors. Refer to dump to 
determine which routine called SYSERR 

Same as 50, except EDITOR debugging code is on 

Input/output error occured on file EDITFIL 
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EDITOR INSTALLATION PARAMETERS 

EDITOR uses two common decks IPFTN (FORTRAN) and IPCOM (COMPASS) to hold 
installation parameters. Generally, a change to one common deck requires a 
corresponding change to the other. With the exception of arrays which must be 
dimensioned for FORTRAN in common deck IPFTN, the values of installation 
parameters are not defined in IPFTN. IPFTN merely allocates storage for these 
definitions. The definitions are DATA statements in the BLOCK DATA subprogram 
IPFILL. 

IPCOM contains EQU's which define the installation parameters. Since many | 
parameters are of such a nature that a change in one implies a change of 
another, a dependency chart is included below to aid the installation. 

Summary of the steps to be taken to change an EDITOR installation parameter: 

1. Change the DATA Statement in IPFILL or the EQU in IPCOM, or both, as 
indicated by the parameter description. 

2. Consult the dependency chart for any dependent installation parameters 
that require change, and change them as in step 1. 

3. Consult the dependency chart for dimensions of arrays in IPFTN. If they 
are affected, change them as indicated in the table. Array Dimensions in 
IPFTN. 

kny changes which cause the size of the EDITOR to increase may require an 

increase in the field length defined for EDITOR in the MUJTABL for 1QP. The 

following list shows the release values and UPDATE identifiers for IPFILL, 
IPCOM, and IPFTN. 
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EDITOR Installation Parameters 



In this table, -* in the Range column indicates -where a parameter has 
essentially no absolute upper limit. The installation determines the 
practical upper limit based on considerations such as EDITOR size and expected 
number of users. 



Parameter Defined In 

Name IPFILL IPCOM Description 



Range 



Release 
Value 



NLINE 



X 



Default first line 
number for CREATE, 
EDIT, RESEQ 



6L000001 
to 6L999999 



6L000100 



NINCR 



Default line number 
increment for ADD, 
CREATE, EDIT, RESEQ 



1-999998 



10 



NUAS 



Number of user area 
buffers 



1-* Large number de- 
creases response time 
if there are many users 



MCTT.TPC 



files which may be 
attached at any one 
time 



NBBS because EDITOR 
assigns a big buffer 
for each attached file 



NBBS 



Number of big buffers 
(used for EDIT, SAVE, 
RUN) 



1-* Increase if many 
EDITS, SAVES, RUNs 
anticipated 



NPBS 



Number of pool buffers. 
Each is 64*NPRUS words 



2-* Increase when 
heavy file modifica- 
tions or long text 
lines expected, 
generally NPBS>NUAS 



NUSERS X 



Maximum number of users 1-* Vary with ex- 
simultaneously using pected usage of 
EDITOR EDITOR 



30 
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Parameter Defined In 

Name IPFILL IPCOM Description 



NPRUS 



X 



NSUA 



X Number of 64-word 
PRUs in one block 
in edit file 



Size of user area; 
must be modified in 
IPFILL if NPRUS is 
changed. NSUA=6 7+ 
64*NPRUS. Size does 
not include portion 
of user area used for 
tabs, return jump links, 
and edit file index 



Range 

1-* Large number de- 
creases response time 
for commands which 
process large files, 
but it also increases 
amount of central 
memory required for 
EDITOR by 64 words 
for each pool buffer 
and 64 words for each 
user area buffer 

131-* 



Release 
Value 



195 



JTABS 



Number of word in user 
area which holds tab 
values ; must be mod- 
ified in IPFILL if NPRUS 
is changed. JTABS= 

C "7-L C fi * TV-IT"* T">T1«~" 



131-* 



195 



JNDXHDR 



Number of index header 
word in user area; 
must be modified in 
IPFILL if NPRUS is 
changed. JNDXHDR= 
JTABS+ (NTBSMAX+4) /5 



132-* 



197 
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Parameter Defined In 

Name IPFILL IPCOM Description 



J INDEX 



X 



JRJLNKS X 



NS INDEX X 



NTBSMAX X 



XNPCENT X 



NTABFTN 


X 


NTABCOM 


X 


NTABCOB 


X 


NTABALG 


X 


NTABDEF 


X 



Number of first word 
in edit file index in 
user area; must be 
modified in IPFILL if 
NPRUS is changed. 
JINDEX=JNDXHDR+1 

Number of first word 
in return jump link 
area in user area; 
must be modified if 
NPRUS is changed. 
JRJLNKS=JINDEX+NSINDEX 

Number of index 
entries for each 
user's edit file 

Maximum number of tab 
settings permitted by 
FORMAT command 



Percent to which each 
block of user's edit 
file is filled by 
EDIT (Padding factor) 

FORTRAN tab character 

COMPASS tab character 

COBOL tab character 

ALGOL tab character 

Default tab character 



Range 
133-* 



153-* 



1-* Increase for 
editing very large 
files 

1-509 Must be 

> NTBSFTN, NTBSCOM, 

NTBSCOB, NTBSALG, 

NTBSDEF 

.01-1.00 Decrease 
if heavy file modi- 
fication is expected 



1LA-1L; 
1LA-1L; 
1LA-1L; 
1LA-1L; 
1LA-1L; 



Release 
Value 

198 



218 



20 
10 

.90 

1L; 
1L; 
1L; 
1L$ 
1L; 
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Parameter Defined In 

Name IPFILL IPCOM Description 



Range 



Release 
Value 



NTBSFTN X 



NTBSCOM X 



NTBSCOB X 



NTBSALG X 



NTBSDEF X 



NCHFTN 



NCHCOM 



NCHCOB 



NCHALG 



MCtiDlDi?" 



NCHBAS 



Number of FORTRAN tabs 0-509 
defined 

Number of COMPASS 0-509 
tabs defined 

Number of COBOL tabs 0-509 
defined 

Number of ALGOL tabs 0-509 
defined 

Number of Default tabs 0-509 
defined 

Maximum no. of charac- 1-510 
ters in FORTRAN line 

Maximum no. of charac- 1-510 
ters in COMPASS line 

Maximum no. of charac- 1-510 
ters in COBOL line 

Maximum no. of charac- 1-510 
ters in ALGOL line 

Maximum no. of charac- 1-510 
ters in default format 

Maximum no. of charac- 1-510 
ters in BASIC line 



72 



72 



72 



72 



7 2 



72 
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Parameter Defined In 

Name IPFILL IPCOM Description 



FTNTABS 



COMTABS 



Consecutive stream of 
bits, each 12 define 
a tab position for 
FORTRAN format. Must 
be ascending order 

Same as above, for 
COMPASS 



Range 

1-511 
(each 
tab) 



Release 
Value 

00070000000000000000B 



1-511 00130022004400000000B 



COBTABS 



Same as above, for 

COBOL 



1-511 00100014002000240030B 



ALGTABS X 



Same as above, for 

ALGOL 



1-511 00070012001500200023B 



DEFTABS X 



Same as above, for 
Default format 



1-511 00070000000000000000B 



NSBB 



Size of big buffers 
used for EDIT, SAVE, 
RUN (does not include 
FET) 



64-* Increase for 
very large files 



257 
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EDITOR Array Dimensions in IPFTN 



Array Name 

FTNTABS 

COMTABS 

COBTABS 

ALGTABS 

DEFTABS 

MMUJTBL 

MUAS 



MBBS 
MPBS 
MBBMA 
MPBMA 



Usage 

FORTRAN tabs 

COMPASS tabs 

COBOL tabs 

ALGOL tabs 

Default tabs 

Storage needed by muj 
subroutine tables 

User area buffers 

May never exceed 
4095 decimal 



Big buffers 

Pool buffers 

Big buffer management area 

Pool buffer management area 



Array Dimension 

(NTBSFTN+4) /5 

(NTBSCOM+4) /5 

(NTBSCOB+4) /5 

(NTBSALG+4)/5 

(NTBSDEF+4)/5 

3*NUSERS + NFILES + NUAS +6* 
(NPBS+ 1 ) 

NUAS* (size of full user area) 
where: 

(size of full user area) = 
(NTBSMAX+4) /5 + NSINDEX +1 + NSUA 
+ NSRJLNK 

Note: NSRJLNK should not have to 
be changed by an installlation 

NBBS*NSBB + NBBS*6 

NFBS*64*NPRUS 

NBBS 

NPES 
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If changed 



NLINE 

NINCR 

NUAS 

NFILES 

NBBS 

NPBS 

NUSERS* 

NS INDEX 

NTBSMAX 

XNPCENT 

NTABFTN 

NTABCOM 

NTABCOB 

NTABALG 

NTABDEF 

NTBSFTN 

NTBSCOM 

NTBSCOB 

NTBSALG 

NTBSDEF 

NCHFTN 

NCHCOM 

NCHCOB 

NCHALG 

NCHDEF 

NCHBAS 

FTNTABS 

COMTABS 

COBTABS 

ALGTABS 

DEFTABS 

NSBB 

NDEBUG 

NPRUS 



EDITOR Dependency Chart 

and arrays in IPFTN 



Check parameters in 
IPFILL and/or IPCOM 



NBBS 
NFILES 



JRJLNKS 

JNDXHDR , J INDEX , JRJLNKS 



NTBSMAX, 
NTBSMAX, 
NTBSMAX, 
NTBSMAX, 
NTBSMAX, 



FTNTABS 

COMTAABS 

COBTABS 

ALGTABS 

DEFTABS 



NTBSFTN 
NTBSCOM 
NTESCOB 
NTBSALG 
NTBSDEF 



JTABS , JNDXHDR , JINDEX , 
JRJINKS,NSUA 



MMUJTBL,MUAS 

MMUJTBL 

MBES,MBBMA 

MPBS ,MPBMA, MMUJTBL 

MMUJTBL 

MUAS 

MUAS 



FTNTABS 
CCMTABS 
COBTABS 
ALGTABS 
DEFTABS 



FTNABS 

CCMTABS 

COETABS 

ALGTABS 

DEFTABS 

MBBS 

MPBS, MUAS 



♦When NUSERS is increased, the user should consider changing also the size of 
the TERMIN and TERMOUT tables in the muj subroutines MUJSUBS. See INTERCOM 
MULTI-USER JOB CAPABILITY Programming System Bulletin (60 358300) under the 
heading "Changing Size of TERMIN and TERMOUT." 
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EDITOR DEBUG CODE 



If EDITOR encounters hardware and/or software problems, diagnostic printout is 
produced. If the problem is considered fatal, all EDITOR users are detached. 
The content of the diagnostic printout depends upon the error encountered and 
the setting of NDEBUG. In any event, the diagnostic printout should accompany 
any PSR relating to a MUJ SYSTEM ERROR. See also MDEBUG below. 



MULTI-USER JOB INSTALLATION PARAMETERS 

The multi-user job (muj) subroutines use two common decks, MUJCOM and CMUJCOM. 
Both contain storage allocation for an array, ECSBUF. The MUJCOM deck in 
FORTRAN code contains a DIMENSION statement; the CMUJCOM deck in COMPASS code 
contains a BSS statement. This array is used by the muj peripheral processor 
routines, FAD, to read information from Extended Core Storage (ECS). Array 
length must be (n*64+1) central memory words. The value of n may be selected 
by the installations, depending on the expected use of ECS for storage of user 
swap files (if ECS will be used, n should be at least 2) and on the number of 
local files allowed for an INTERCOM user. As a guide, n may be increased by 
one for each 2 local files allowed per user. The upper limit for n is 
dependent on the amount of storage to be used for ECS buffer in the muj, and 
the size of the swap buffer in FAD. 

The peripheral processor routine FAD contains two parameters relevant to 
allocation of space for ECSBUF. ECSBFLN (near FAD. 659) is a COMPASS EQU 
instruction. It must be equated to the number of central memory words in the 
ECSBUF array. SWAPBF (near FAD. 650) is a table FAD uses to read the ECSBUF 
array into PP memory. The value of ECSBFLN, and thus the size of the ECSBUF 
array in MUJCOM and CMUJCOM, must not be greater than 1+ (length of SWAPBF) /5. 



MDEBUG 

Symbol MDEBUG in common deck CMUJCOM controls muj debugging code (0=off, 
1=on). It should be set to 1 if EDITOR installation parameter NDEBUG is set 
to 1. 



INSTALLATION PROCEDURES 

Two installation decks are included on the released program library as files 2 
and 3. Deck INTCM1 assembles the released program library adding the created 
binary to the PL tape as supplemental files. The release tape does not 
contain assembled binary. Deck INTCM2 uses EDITLIB to enter the binary 
created by deck INTCM1 into the running system. Deck INTCM1 will require 
modification if the single default low speed driver type is not the correct 
variant or multiple low speed driver types are desired. If the hardware 
configuration does not contain 200 User Terminals or teletype devices (e.g., 
LCC only system) , assembly of the low-speed multiplexer driver can be avoided 
by changing card number 17 of deck INTCM1 to COPY BR (COMPILE, NIL) . 

Job card. 
REQUEST (PL1 2, E) 
REWIND (PL1 2) 
SKIPF(PL12, 1,17) 
C0PYBF(PL12,PUNCH,2) 
UNLOAD (PL1 2) 
6/7/8/9 



Skip PL 

Punch installation decks 
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With deck INTCM1, one variant of the PP multiplexer low speed driver will be 
produced which will drive BCD 200 User Terminals (2400 baud) and Teletypes on 
the 6671 multiplexer. The exact number and type of multiplexers supported by 
the driver is determined by the settings of the IP.N6671 and IP. N6676 symbols 
in the INTERCOM common deck INTCOM. Instructions follow the deck listing 
regarding how to change the driver definition or increase the number of 
drivers defined. 

Deck INTCM2 suggests CM residency for selected PP routines. Sites having ECS 
may wish to move some of these PP routines to ECS by employing the method 
discussed in the Deadstart portion of the SCOPE section. 

NOTE: The T7000 parameter on the INTCOM1 job card must be changed to T20000 if 
the deck is to be run on a 6200. 

INTCMi,CM65C00,T700QfMT2. 001 

COMMENT. THIS JOB UPOATES AND CREATES THE BINARY OF INTERCOM 002 

COMMENT. THE NEfc PL12 WILL CONSIST OF FIVE FILES 003 

COMMENT. THE FIRST FILE MILL BE THE NEWPL 004 

COMMENT. THE SECOND FILE WILL BE THE BINARY OF THE PP ROUTINES 005 

COMMENT. THE THIRD FILE WILL BE THE RELOCATABLE BINARY OF THE OVERLAYS 006 
COMMENT. THE FOURTH FILE WILL BE THE BINARIES CF THE INTERACTIVE GRAPHICS 007 

COMMENT. SYSTEM 008 

COMMENT. THE FIFTH FILE WILL BE THE ABSOLUTE BINARIES OF THE OVERLAYS 009 

LABEL (FL12I*,R,L=INTERC0M4P1*3P4,0=HI) INTERCOM OLOPL 010 

REGUEST,PL12,N,HI. SCRATCH FOR *EW PL12 Oil 

LAEEL<FLi2,W,L=INTERC0M4Pi*3P4,D=HI> 012 

RENIN0<Pli2IN,PL12> 013 

UPCATE<F,P=FL12IN,N=PL12,C=0) 014 

UPDATE(F,P = FL12> 015 

UNL0A0CPL12IN) 016 

COMPASS<I,S=PPTEXT,S*IPTEXT,L=Q> DRIVER 017 

COMPASS(l=CCMPILEtS=SCPTEXT,S=IPTEXT,S=SCHTEXTtS*STATEXT,Ls0) 018 

FTN<I=COKPILE,S=CPCTEXT,S=PFMTEXT,S=IPTEXT»S*ICTEXT f B=LG01,L=O f OPT=i> 019 

COFYBR (COMPILE, ML) 020 

FTNCI=COMFILE,S=CPCTEXT,B=LGO2,L=0,OPT=i) IGS ROUTINES 021 

FTN(I=COMFILE,S=CPCTEXT,B=LGO2,L*0,OPT=iJ IGS ROUTINES 022 

REWIND, LG0,LG01,LG02. 023 

SKIPF(FL12,1,17) 024 

COFYBF(LGO,PL12I 025 

COFYEF(LG01,PL12> 026 

COFYEF(LG02,PL12> 027 

REWIND, LG01. 028 

LOA0,LG01. 029 

NOGO. 030 

REWINOCIKTRCOM) 031 

C0FYBF(INTRC0M,FL12) 032 
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UNL0AC(PL12> 

7/8/9 END CF RECORD ° 33 

*/ ADD CCRRECTICNS HERE 

7/8/9 END CF RECORD ° 35 

*IC YNKMLJST 

Itpp^ E vv^ IJSTAT (EDIT0R D0ES N OT USE MUJSTAT) ^38 

♦DEFINE, TYFEF SELECTS DRIVER TYPE 2?? 

♦I INTCCM.91 0(f0 

IF.N6671 CEQU 1 J 41 

IF.N6676 CEQU ° 42 

*CCMFILE,1M1 ° 43 

7/8/9 END CF RECORD ° 44 

*/ FLACE MULTIPLE DRIVER UPDATE MODIFICATION RECORDS HERE nut, 

7/8/9 END CF RECORD °^ 6 
6/7/8/9 ENC CF FILE 

Deck INTCM2 suggests CM residency for selected PP routines. Sites having ECS 
may wish to move some of these PP routines to ECS by employing the method 

discussed in the Deadstart portion of the SCOPE section. 

INTCM2,CM5£QCO,T7000,MT1. 

COMMENT. THIS JCB EDITLIBS THE INTERCOM V4.1 BINARIES FROM THE NEW PL12 002 

COMMENT. CREATED BY THE DECK INTCM1. L1Z J°* 

LAEEL(FL12,R,L = INTERC0M< i Pi*3P4,0=HI> MOUNT INTERCOM V4.1 PL nnf 

REfcINC,FL12. ""J 

SKIFF(FL12,l,i7) SKIP OLDPL HI 

C0FYBF(PL12,INTFP> INTERCOM PP ROUTINES QQ j 

rnpypprcM^rc! SKIF 0VERLAYS ™ RELOCATABLE FORMAT Ofl 8 

C0FYEF(PL12,IGS) BINARIES OF IGS nna 

C0FYEF(FLi2 .IKTrp» TWTtprnM t*e d,m .-r -r » .- ,-. uu ^ 

REWIN0,INTFF,IGS,INTCF,PL12. "* U 

UNL0AC(PL12) D11 

EDITLIE(SYSTEM) ?^f 

COMMENT. *** END CF JOB *** JJ? 

7/8/9 END CF RECORD Ulk 
READY(SYSTEM) 

REFLACECINTFF) JJ** 

M0VE(1ER,CM) ° 17 

M0VE(1GP,CM) ° 18 

M0VEC3TT.CM) ° 19 

M0VE(3T1,CM> Jf° 

M0VE(3T2,CM) JfJ 

M0VE(1CI,CM) J" 

M0VE(3CI,CM) °; 3 

MOVE(3CT,CM) ??> 

M0VE(3CF,CM) 02 , 5 

LIERARY(NUCLEUS,OLD) 5?f 
RE FLACE (LOGIN, INTCP,AL=i,FL=20 40 0,FLO=0> 
REFLACE(CCNNECT,INTCP,AL=3,FL=2G0,FLO=Q) 
RE FLACE (SITLATE,INTCP,AL=3,FL= 16100, FLO=0) 
RE FLACE (DISC0NT,INTCP,AL=3,FL= 200, FLC=Q) 
REFLACE(EATCH,INTCP,AL=1,FL=16 3CC,FLO=0) 
REFLACE(G,INTCF,AL=3 f FL = 1^0 0,FLO=0) 
REFLACE(FAGE,INTCP,AL=3,FL=324 00,FLO=0) 
RE FLACE (SEND, INTCP,AL=3,FL=20i 00, FLO=0) 
RE FLACE (LCGCUT, INT CP,AL=i,FL=l 2300, FLO=0) 
RE FLACE (CONVERT, INTCP,AL=3,FL= 22300, FLO=0) 
REFLACE(ERESEQ,INTCP,AL=3,FL=^0 00 0,FLO=0) 



027 
028 
029 
030 
031 
032 
033 
035 
036 
037 
038 
039 
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REFLACE<TEACH,INTCP,AL=i,FL=31400,FLO=Q> . JJJ 

REFLACE(FILES,INTCP»Ai-l,FL=i0 300,FLO=0) J*J 

REPLACE(STORE,INTCP,AL=i,FL=i4200,FLO=0) *« 

REFLACE<CISCARC,INTCP,AL=i,FL=12G00,FLO=Q> J*f 

REFLACE<FETCH,lNTCP,AL=3,FL=i4000,FLO=:0> «** 

REFLACE(XEQ,INTCP,AL*3,FL=i530 0,FLO=0> »*» 

R£FLACE<FASSWRC,INTCP,AL=7777, FL«*6*00»FLO«0) J?° 

REFLACE(ASSETS,INTCP,AL=i,FL=10200,FLOsOD JJJ 

REFLACE(REAC,INTCP,AL=3,FL=7<*00,FLO=0> »« 

REFLACEC ERRORS, INTCP, AL=3,FL=26000,FLO=Q) «** 

REFLACECTESTLF,INTCP r AL=3,FL=2000,FLC*0) »»« 

R€FLACE(EOnOR,INTCP,AL=3,FL=37000,FLO=0) »»* 

FINISH. 053 

LIBRARY(SYSCVL,CLO) J' 

REWING(IKTCF) 055 

REFLACE<Q6000i-G7000fINTCP) J~~ 

R£ PLACE (ERFTN*ERRUN,INTCP> Jj* 7 

FINISH* ncQ 

LIERARY(IGS274,0L0) " 

REFLACE(*,IGS,AL=0) 060 

FINISH. 061 

COMPLETE. 062 

ENCRUN. 

7/8/9 END CF RECORD 
6/7/8/9 ENC OF FILE 

PASSWORD FILE CREATION 

Access to the INTERCOM system is controlled by passwords. The user must 
specify a valid password to log in to the INTERCOM system. Two types of 
passwords exist: 

Restricted passwords: When he logs in, the user must specify a valid user- 
Associated with the given password. The installation defines valid 
password/user-name combinations. A user id (two alphanumeric characters) is 
assigned by the PASSWRD utility, and it is permanently associated with the 
passSuser-name. This user id is assigned from a P~^* ™J^£ e U8 « 
id's; it is marked as available again only when the password/user name is 

deleted . 

Unrestricted passwords: The user may specify any user-name when he logs in; 
the user-name is not validated. However, when * «■« fxwt 1 ^ £^1^1 

cTiv^n user-name, a user id is associated by the LOGIN utility wixn xnaj 
paslword%Lr-nlme combination. Thereafter, this user id is associated with 
?he £ssword/user-name combination, until the password/user-name is deleted 
from the system. 

Throuah the INTERCOM routine PASSWRD, the installation defines valid 
restricted pis sword/user-name combinations and valid unrestricted passwords 
and accounting values to be associated with the password /user -names or 
a passwordT n SlsW^Dmust be called from a data dec* su b-£t.^o t£ central 
lite as a batch job. The routine will create two P^ man ^ E ^ ^y^ ^^ 
existina files) . One file, with the permanent file name iNTERCOMPAbbwuKDb, 
contain! all unrestricted passwords, all restricted password/user- names, and 
a?l accounting ^formation. The other file with the per ■»•« ilj name 

INTERCOMUNRESTRICTED, contains a bit map defining «!*^ e * "~ ** S ' Pitied 
contains all unrestricted password/user-name combinations currently specified 

at LOGIN time. 
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h total of 1296 user ID's (all possible 2-character combinations of A-Z, 0-9) 
are available to the INTERCOM system. User ID's are assigned permanently to 
password/user-name combinations. Installations with many users should: 

Instruct users of unrestricted passwords always to use the same character 
string for user-name when logging in. 

Make use, on a regular basis, of the editing facilities in PASSWRD to 
delete all unrestricted user -names, etc, freeing user ID's. 

While a user is in the process of logging In, he is assigned a temporary ID. 
Temporary ID's begin with one of the following special characters: + - * / ( 

) $ = :- ; 

The following deck structure can be used to run the PASSWRD routine, creating 
a password permanent file: 

Job card. 

PASSWRD. 

7/8/9 

NEW 
ADD 

• 

6/7/8/9 

The following deck structure can be used to modify existing password permanent 
files: 

Job card. 

PASSWRD. 

7/8/9 

OLD 
ADD or 
DEL 



6/7/8/9 

This mode of PASSWRD operation will update the existing permanent files by 
adding new or deleting old entries. If both files do not exist a PF ERROR=12B 
will abort the run. 

To protect against unauthorized modification of the password files, the 
PASSWRD utility requests permission from the console operator before any 
modifications are made. 

Between the NEW (or OLD) card and the 6/7/8/9 card appear the parameter cards 
which specify the new entries or the editing requirements. After a NEW card, 
only ADD parameter cards may appear; after an OLD card, either ADD or DEL 
parameter cards may appear. The ADD card creates a new entry, or replaces an 
old entry which has the same password/user-name. The DEL card deletes one or 
more entries. The NEW card may be used to delete existing files entirely and 
to construct new ones. 
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The format for an ADD parameter card is; 

ADD U=username, P=password,F=f length, T=time,A=acclevl,N=nf iles 
user name 



password 



flength 



time 



acclevl 



nfiles 



User name (1—10 alphanumeric characters) must be specified for 
restricted passwords; it must be blank or omitted for 
unrestricted passwords. 

Password (1-10 alphanumberic characters) must be specified. It 
must be the only unrestricted password of this name defined by 
the installation. If it is restricted, it must be the only 
password/user- name of this particular combination defined by the 
installation. (If the password or password/user- name have been 
previously defined, the ADD card will function as a replace.) 

Maximum field length available to the user (1-6 octal digits). 
If blank or omitted, 60000 octal CM words will be assumed. This 
value may not exceed IP.MFL. 

Time limit for user*s session (1-4 octal digits, also defines 
the maximum ETL for individual jobs) . If blank or omitted, 500 
octal seconds will be assumed. 

Access level/permission bits for the user (1-4 octal digits). 
This value defines which programs the user can access. If blank 
or omitted, an access level of 5 is assumed. 

Number of files this user is permitted to attach as local files 
at any one time (1-2 octal digits). If blank or omitted, 24 
(octal) files will be allowed. This value may not exceed 7"6B» 



All parameters start after column four on the ADD and DEL cards. They may be 
specified in any order and should be separated by delimiters (special 
characters) . 

The DEL card is used to delete one or more entries from one or both of the 
permanent files. It has two formats: 

DEL U=username,P=password 

■■- DEL I=id 
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username May take three forms: 1-10 alphanumeric characters, blank, or 
the character string *NAMES. If the first form is used, the 
password/user-name combination (restricted or unrestricted) will 
be deleted; and the user ID will become available. if the 
second form is used, all entries in the two files with the given 
password will be deleted. All user ID f s associated with these 
entries will become available; the password will no longer be 
defined. The third form may be used only if the specified 
password is unrestricted. All entries in the unrestricted 
password file with the given password will be deleted, and the 
associated ID»s will be made available. The password will still 
be defined. 

password Password to be processed, whether an unrestricted password is 
deleted or not depends on the username parameter. If password 
is *NAMES, all user-names for all unrestricted passwords will be 
deleted from the permanent files; and the user ID 8 s for these 
user-names will become available. The unrestricted passwords 
will still be defined. 

ID User ID; may be used as a shorthand notation to specify the 

password/user-name associated with this user ID. The given 
password/user- name entry (restricted or otherwise) is deleted 
and the user ID becomes available. if the password is 
unrestricted, it will still be defined. 
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VERIFICATION PROCEDURE 

INTERCOM is brought to control point zero when INTERCOM is entered at the 
console after the operator has entered the time. 

The verification procedure cannot proceed unless a permanent file has been 
established containing the user passwords. 

The following sample from a Teletype terminal session will indicate if 
INTERCOM 4.1 is installed correctly. The underlined characters are typed by 
the user. 

CONTROL DATA INTERCOM 4.1 
DATE 07/19/72 
TIME 14. 11.41. 

PLEASE LOGIN 

LOGIN 

ENTER USER NAME- U SERA 

SBSSSSBSSB ENTERPASSWORD- 



07/19/72 LOGGED IN AT 14.12.30. 
WITH USER- ID BT 
EQUIP/PORT 54/03 
COMMAND- FILES 
NONE 

COMMAND- EDITOR 
. . FORMAT, FORTRAN 
. . FORMAT, SHOW 

CH= 72 TAB CHAR=; TAB C0L= 7 

. . CREATE 

100=; PROGRAM A( OUTPUT) 
1 10=; PRINT 1 
120= 1; FORM AT (* TEST*) 
130= ; END 
140= = 
. . SAVE, B 
. . RUN,FTN 

.084 CP SECONDS COMPILATION TIME 
TEST 

END A 
. . BYE, BYE 
COMMAND- FILES 
--LOCAL FILES-- 
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LGO 



B SIMPUT SOUTPUT 

COMMAND- RETURN., B 
COMMAND- RETURN,LGO 
COMMAND- FILES 
--LOCAL FILES-- 

SINPUT SOUTPUT 

COMMAND- EDITOR 
• « FORMAT, BASIC 
• * FORMAT, SHOW 

CH= 72 TAB CHAR=; TAB COL= 

• » 1Q PRINT # TYPE A NUMBER OR (ZERO) TO END # 
20 INPUT X ~~ ~~ 

25 IF X=0 THEN 80 
30 F=l 

40 FOR I = 1 TO X 
50 F = F * I 
55 NEXT I 

60 PRINT # FACTORAL # Xi # IS # F; 
70 GO TO 10 
80 END 
SAVE, BASIN 
. . BYE 

COMMAND- REWIND(BASIN) 
COMMAND- CONNECT(BASOUT) 
COMMAND- BASIC(I=BASIN,K=BASQUT) 



TYPE A NUMBER OR (ZERO) TO END 
\ 2 

FACTORAL 2 IS 2 

\ 3 

FACTORAL 3 IS 6 

\ 4 

FACTORAL 4 I S 24 

\ 

COMMAND- DISCONT, BASOUT 
COMMAND- FILES 
— LOCAL FILES — 

SINPUT SOUTPUT BASIN 

COMMAND- LOGOUT 
CP TIME 2.819 

PP TIME 21.796 

CONNECT TIME HRS. 11 MIN. 

07/19/72 LOGGED OUT AT 14.23. 42. < 



TYPE A NUMBER OR (ZERO) TO END 
TYPE A NUMBER OR (ZERO) TO END 
TYPE A NUMBER OR (ZERO) TO END 



BASOUT 
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RELEASE DESCRIPTION 

HARDWARE CONFIGURATION 

PERT/TIME requires a minimum hardware configuration of one computer with at 
least 65K central memory, three tape units, and the other minimum equipment 
required by SCOPE. 

RELEASE MATERIALS 

PERT/TIME is released on program library PL13. 

LIMITATIONS 

Since the file names TAPE1 through TAPE6 are used internally, no user file 
name may be TAPE1-6. 

CORRECTIONS 

All eligible PSR code as published through PSR Summary 312 has been added to 
the program library. 

GENERAL PROCEDURES 

PERT/TIME 1.2 runs under SCOPE 3.4 and is on the PL13 program library tape. 

None for PERT/TIME. 

INSTALLATION PROCEDURES 

PL13 contains 4 files. File 1 is the program library; file 2 contains PERT in 
overlay format. Files 3 and 4 contain the installation and verification 
program decks. 

To obtain these decks, perform the job: 

Job card. 

REQUEST ( PL 1 3, E) 

REWIND (PL 13) 

SKIPF(PL13,2,17) 

C0PYBF(PL13, PUNCH, 2) PUNCH INSTALLATION AND VERIFICATION DECKS 

UNLOAD (PL1 3) 

6/7/8/9 
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PERT,CH11000C,T70Q0,MT2. 001 

COMMENT. THIS JCB UPDATES AND CREATES THE BINARY OF PERT. 002 

COfHENT. THE NEW PL13 WILL CONSIST OF TWO FILES 003 

COMMENT. THE FIRST FILE WILL BE THE PERT NEWPL 00<* 

COKMENT. THE SECOND FILE WILL BE THE ABSOLUTE BINARY OF PERT 005 

COMMENT. 006 

LAEEL<FLi3Ih,R,l=PERT*3P4,D=HI> KCUNT PERT PL 007 

REQUEST, FL13,N, HI. SCRATCH FOR KEW PL13 008 

LAEEL(PL13,fc,L=PERT»3P<*,D=:HI) 009 

REWINC<PL13IN,FL13) 010 

UPGATE<F,F=FL13IN,N=PL13) Oil 

UNLOAC(PL13IN) 012 

RUMS,,,COHFILE,NONE,PERTBIN,iQQ00C> 013 

LOAO(FERTBIN) GENERATION CF OVERLAY PEFT66 Ol^i 

NOGO. 015 

REWINC,FERT66. 016 

REWIND(FERTEIN) 017 

SKIPF(FL13,i,17) 018 

COFYBF(PERT66,PL13) 019 

UNLCAC(PL13) 020 
7/8/9 EIsC CF RECORD 

»/ ADD CORRECTIONS HERE 022 
7/8/9 END CF RECORD 
6/7/8/9 END OF FILE 

The installation deck PERT provided as release tape file 3 compiles the 
PERT/TIME product, forms the necessary overlays, and writes these overlays on 
the program library tape. PERT must be executed from this overlay tape; PERT 
cannot be executed from the running system. It is not possible to build a 
PERT/TIME binary tape or to execute programs on a computer with only 32K 
memory. 

To execute from the overlay tape, the following deck is required: 

PERT,T1000,CM120000,TP1. 

REQUEST TAP,E. 

REWIND (TAP) 

SKIPF(TAP,1,17) 

COPYBF (TAP,PERT66) 

PERT66. 

7/8/9 

PERT networks 
7/8/9 

6/7/8/9 

If a master tape is made, insert after card 3: 
REQUEST TAPE6,MT. 
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If an old master tape is input and a new master tape saved, insert the 
following after card 3: 

REQUEST TAPE4,MT. OLD MASTER 
REQUEST TAPE6,MT. NEW MASTER 

If either option is used the TP1 job card parameter must be increased. 

Successive PERT/TIME networks may be processed by batching as follows: 

K 

L ■'■■'' 

M 

X ■ ■ 

Y ■ - • 

W 

A PERT BATCHED NETWORKS 



(Input for each network starts with the R ccntrol card and ends with the Z 
control card* = 
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REPORT DATE- 9/17/64 
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KEY 
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RELEASE DATE- 9/17/6*1 
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VERIFICATION PROGRAM 

Output from the PERT/TIME Verification program follows. The time required to 
run this program is less than two minutes of 6400 computer clock time. 

SCCFE 3,4 
G5.45.G8.VPERT37 

G5.45.09.VFERT,CM120Q0Q,T7CC0,TPi. 
G5.45.C9. THIS SIMPLE PROGRAM VERIFIES CORRECT IN 
05.45.09.STALLATION OF 
05. 45.09. PERT/TIME 

05.45.G9.R£GUEST,PL13,E,HI. LATEST PERT/TIME OLDP 
05. 45. 09. L 

05. 45. 52. ( MT25 ASSIGNEO) 
05. 45. 52. REWIND, PL13. 
05.45.53.SKIPF(FLi3,l,i7) 

05.45.57 e MT25 VOLUME SERIAL NUMBER IS 004246 
05 .46.C2.C0PYEF(PL13,PERT66) 
05.46.14.SMT 25 RD RVD TAPE PAR ERR 
05.46.14.SMT 25 PRU = 00000221 
05.46.i7.RETURN(PLi35 
05.46.18.PERT66. 

05.46.27. 8.464 RT SECONDS LOAC TIME 

05. 47. 36. STOP 
05.47.39. END CF JOB 
05.47.39.CPA 4.049 SEC. 

05. 47. 39. PP 60.938 SEC. 
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RELEASE DESCRIPTION 

SIMSCRIPT Version 
configuration as SCOPE. 



2.0 operates under SCOPE 3.4 on the same minimum | 



RELEASE MATERIALS 

The release materials for SIMSCRIPT 
library tape PL14. 



Version 2-0 are included on program I 



CORRECTIONS 

Ml eligible PSR code as published through PSR Summary No. 312 has been added. 

LIMITATIONS 

SIMSCRIPT Version 2.0 operates under SCOPE 3.4 in conjunction with COMPASS | 
3.0 and either FORTRAN Extended 3.0 or FORTRAN 2.3. 

jobs interfacing with FORTRAN *.* reguxre • ^V£. J-" 6 *rr~ p ™™ _ Extended 

SYSMlsCi orecedinq the LGO directive. Jobs interfacing with FORTRAN Extenaea 

l!o require the V3.0 FTN object library to be installed and a card of the form 
LIBRARY (SYSMISC) preceding the LGO directive. 

INSTALLATION PARAMETERS 
None 



INSTALLATION PROCEDURES 

PL14 contains 6 files. File 1 contains the SIMSCRIPT program library; file 2 
contains the relocatable binary of the execution tlm * *° utl £:?! s J 1 ^ * 
contains the compiler overlays in absolute binary format. Files 4 and 5 
contain the installation decks; file 6 contains the verification program. 

To obtain the SIMSCRIPT installation and verification decks, perform the 
following job: 



Job card. 
REQUEST (PL 1 4, E) 
REWIND (PL 14) 
SKIPF(PL14,3,17) 
COP YBF (PL 14, PUNCH ,3) 
UNLOAD (PL 14) 
6/7/8/9 



MOUNT SIMSCRIPT PL 



PUNCH INSTALLATION AND VERIFICATION DECKS 
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Job SIMSC1 is a maintenance deck which creates a release format tape 
containing a revised program library and compiled binary. Job SIMSC2 can be 
used to enter SIMSCRIPT into the running system through EDITLIB either from 
the released tape or from the tape created by SIMSC1. Job SCOPE3, described 
in section 1, then should be run to generate a deadstart tape of the running 
system. 



SI^ SCI 

CO F MEN 

COMMEN 

COWMEN 

COMMEN 

CO MEN 

CO K MEN 

LA EEL ( 

RE CUES 

LAEEL( 

REWIND 

SKIFF( 

COFYEF 

REWIND 

UPDATE 

UNLOAD 

SI MS (I 

COMFAS 

REWIND 

SKIPFC 

COFYEF 

REWINC 

COFYEF 

REWIND 

LOA0(S 

NO GO. 

REWINO 

COFYEF 

UNLOAD 

7/8/9 

V AO 

7/8/9 

6/7/8/ 



,CM65CG0,T70CC,HT02. 

T. THIS JCB UPDATES AND CREATES THE EINARY OF SIMSCRIFT 

T. THE NEW PL14 WILL CONSIST OF THREE FILES 

T. THE FIRST FILE WILL BE THE SIMSCRIPT NEWPL 

T. THE SECOND FILE WILL BE THE BINARY 

T. OF THE RELOCATABLE CP ROUTINES 

T. THE THIRO FILE WILL BE THE BINARY OF THE OVERLAY SIMS 

N,R,L=SIMSCRIPT*3P4,D=HI) SIMSCRIPT FL 

4,N,HI. SCRATCH FOR NEW PL14 

W,L=SIMSCRIPT*3F4,D=HI> 

IN,PL14) 

N,2,17) 

IN, SIMS) 

• 

FL14IN,N=PL14) 

IN) 

ILE,L=0) SIMS CREATES CCMFASS SOURCE ON FILE MAPTP 

APTF,L=C,S=CPCTEXT, S = IFTEXT) 

1,17) 
FL14) 



FL14I 
T,FL1 
FL14, 
(PL14 
FL14I 
(PL14 
,SIMS 
(F,P = 
(PL14 
=CCfF 
S(I=M 
,LGC. 
PL 14, 
(LGO, 
,LG0. 
(LGO, 
,SIMS 
IM6IN 



SIKEIN,85) 



,SIMS. 

<SIfS,PL14) 

(FLl^) 

EhD CF RECORD 
D CORRECTIONS HERE 

END CF RECORD 
9 ENC CF FILE 



001 
002 
003 
004 
005 
QQ6 
007 
008 
009 
010 
Oil 
012 
013 
014 
015 
016 
017 
018 
019 
020 
021 
022 
023 
024 
025 
026 
027 
028 
029 

031 
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SI*SC2,CH55000,T7QGO,MT1. 001 

COKMENT. THIS JCB EDITLI8S THE SIMSCRIPT BINARIES FROM THE FL14 TAPE, 002 

COMMENT. EITHER THE RELEASED VERSION OR THE VERSION CREATED BY DECK 003 

COMMENT. SIPSC1, INTO THE PUNNING SYSTEM, 00*+ 

LAEEL(FL14,R,L=SIMSCRIPT»3P4,D=HI> MOUNT PL14 005 

REHIN0,PL14. 006 

SKIPF<FL14,1,17> SKIP CLDPL 007 

C0FYER(PL14,NIL,85) SKIF RELOCATABLE COMPILER ROUTINES 008 

C0FYBF(PL1A,SIKLB> SIMSCRIPT LIBRARY ROUTINES 009 

CCFYBF(FLl<t,SIMC> SIMSCRIPT COMPILER 010 

REHNC,FLl<4,SIfL8,SIMC. Oil 

UNLOAD(PLl^) 012 

EDITLIB(SYSTEM) 013 

COMMENT. *♦* END OF JOB *** 014 
7/8/9 END CF RECORD 

REAOY(SYSTEM) 016 

LIERARY(NUCLEUS,OLO) m7 

REFLACE(*,SIMC,AL=3,FL=470CG,FLO=1> 018 

FIMSH. 019 

LIERARY(SYSMSCOLD) 020 

REFLACE(*,SIMLE) 021 

FIMSH. 022 

COMPLETE. 023 

ENCRUN. 024 
7/8/9 END CF RECORD 
6/7/8/9 END OF FILE 



VERIFICATION PROGRAM 

j."© verification usck provided with the release validates SIMSCRIPT. The 
validation consists of a SIMSCRIPT job with a report. The time required to 
run the validation job is about one minute. The output includes the actual 
validation (magic squares) and dayfile as follows: 

THIS IS A 3 BY 3 MAGIC SQUARE, ALL OF THE ROWS, COLUMNS AND DIAGONALS SUM 10 15 

4 3 8 
9 5 1 
2 7 6 



THIS IS A 5 BY 5 MAGIC SQUARE. ALL OF THE ROWS, COLUMNS AND DIAGONALS SUM 10 65 
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SCOPE 3.4 07/14/72 

21.15. 49. VSIMSQO 
21.15.5 0.VSIMS,CM6 000 0,TiQOO. 

21.15.50. THIS SIMPLE PROGRAM VERIFIES CORRECT IN 
21.15.50.STALLATICN OF 
21.15.50. SIMSCRIPT 
21. 15. 50. SIMS. 

21.16.04. 12.738 RT SECONDS LOAO TIME 

21. 16. 11. COMPASS (I=MAPTP,L=0) 

21.16.18. ASSEMBLY COMFLETE. 46600B SCM USED. 
21.16.18. 4.555 CPU SECONDS ASSEMBLY TIME. 

21.16. 18. MAP(OFF) 
21.16. 18. LDSET(LIB=SYSMISC) 
21.16. 19. LGO. 

21.16.23. 4.191 RT SECONDS LOAD TIME 

21.16.24. END OF JOB 
21.16.24.CPA 9.227 SEC. 
21. 16. 24. PP 6.847 SEC. 
21.16.24.10 1.004 SEC. 
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RELEASE DESCRIPTION 

8231 IMPORT HIGH SPEED (HS) version 1.0 operates in conjunction with INTERCOM 
4.1 under SCOPE 3.4. It is coded in OSAS-A format and may be assembled on the 
central computer using IMPASSE (IMPORT Assembler) . Off-line utility functions 
of card-to-printer and card-to- punch (if the configuration includes a card 
punch) are provided. 

This system provides a remote job submission center, which accepts jobs for 
6 000 SCOPE 3.4 in the same unit record format as the central site and provides 
identical unit record output within hardware limitations. 

HARDWARE CONFIGURATION 

The minimum configuration for the 8231 IMPORT HS Terminal is as follows: 

8090 Computer (8K is minimum core requirement for IMPORT and buffers) 

161 On-Line I/O Typewriter 

3681 Data Channel Converter 

3447/405 Card Reader 

3 256/501 Line Printer 

852 9-B Data Set Adapter on dedicated Buffered Data Channel (BDC) 

Hardware Options 

.v>«-«. Computer may be substituted for the 8090. A 3446/4 15 Card Punch may 
be included in the 8231 Terminal configuration. 

Communication Link 

Each terminal is connected to the central site by a communication link 
consisting of two DATAPHONE Data Sets 301B or 303, and one TELPAK A 
communication line, or their logical and physical equivalent. 
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Logical Unit Assignments 

Equipment numbers ±or the 8231 should be assigned as follows: 

Card Reader 3 
Card Punch 4 
Line Printer 5 

RELEASE MATERIALS 

hn updated program library for 8231 IMPORT HS 1.0 is contained on program 
library tape PL15. 

Corrections 

ft.ll eligible PSR code as published through PSR Summary No. 312 has been added 
to the program library. 

ADDITIONAL INFORMATION 
IMPASSE 

IMPASSE (Import Assembler) is designed to assemble 8231 IMPOPT HS programs 
under the SCOPE Operating System on CONTROL DATA 6000 Series computers, it is 
intended for installations using 8231 HS terminals which do not have adequate 
peripheral equipment for program assembly. 

IMPASSE is coded in FORTRAN, except for the subroutine SHIFT, which is coded 
in COMPASS. 8231 IMPORT HS is written in standard OSAS-A format. 

In the assembly process, IMPASSE reads input from tile TAPE1 and produces 
binary output on file TAPE2 and an assembly listing, including a symbol 
reference table, on the OUTPUT file. 

IMPASSE produces binary output for the 8231 HS terminal system. 

The terminal identification in 8231 IMPORT is not used under INTERCOM 4.1; the 
central site assigns an ID and notifies IMPORT. 

Job Input Limit Bypass 

The statement ?DVT,, LP may be entered by the operator to divert all line 
printer output to the central site. When this statement is entered, the job 
input limit will be ignored and all line printer output: will be diverted to 
the central site until the system is reloaded. 
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GENERAL PROCEDURES 

Installation of 8231 IMPORT HIGH SPEED version 1.0 requires the following: 

1. Setting of installation parameters for: 

Connect Codes 
Equipment numbers 
Number of active jobs 

2. Assembling 8231 IMPORT HS. 

3. Bootstrapping. IMPORT on the 160A computer by using the binary deck (output 
from the assembly). 

INSTALLATION PARAMETERS 

Connect codes for terminal equipment are assembled at the beginning of 8231 
IMPORT HS as shown below. The card fcrmat for IMPASSE differs from that of 
COMPASS; the location field begins in column 2, the operation field in column 
10, and the variable field in column 15. 

LPCN EQU 5000 Line Printer is equipment 5 (8231IMP.80) 

CRCN EQU 3000 Card Reader is equipment 3 (8231IMP.8 1) 

CPCN EQU 4000 Card Punch is equipment 4 (8231 IMP. 82) 

An equipment number may be changed by replacing the appropriate EQU card. If 
the configuration does not include a card punch, the CPCN card may be made any 
value by EQU, but the CPUNCH card must be made equal to by EQU. The default 
value assumes the card punch is present. 

CPUNCH EQU Card Punch is absent 

(OHP28.1) 
CPUNCH EQU 1 card Punch is present 
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The installation may choose any value as a control on the number of jobs 
active at any time from the terminal. The default value is 2 5. 

JOBLIM EQU 25 Number of jobs active (QHP21.1). 

The installation may choose either the 026 or the 029 character set at 
installation time only. The 026 character set is the default value. This 
cannot be overridden from the terminal. 

To use the 026 characters, set: 

CONTB EQU BISBCD 
To use the 029 characters, set: 

CONTB EQU DISB29 
This card is located at CHP36.110. 

Logical Terminal Assignments 

A terminal line number is determined by the physical connection. 

INSTALLATION PROCEDURES 

PL15 contains three files: file 1 contains the IMPASSE assembler and 8231 
IMPORT HS program library in UPDATE format, file 2 contains the installation 
deck, and file 3 the verification program. 

The installation and verification decks as listed below can be obtained by 
performing the job: 

Job card. 

REQUEST (PL1 5, E) 

REWIND (PL1 5) 

SKIPF(PL15,1,17) 

COPYBF(PL15,PUNCH,2) Punch installation and verification decks 

UNLOAD (PL1 5) 

6/7/8/9 

I dent I864CS, as included on the released 8231 IMPORT HS program library, 
activates selection of the 64-character sets at the remote site. This ident 
is deactivated however by an update YANK directive included in the 
installation deck. The installation deck as provided forces selection of the 
6 3-character set; to select the 64-character sets, the YANK card must be 
r emoved . 
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1. To assemble 8231 IMPORT HS, the following job is run on the 6000 computer: 

IMFHS,CM55CaO,T?000,MT02, 001 

COMMENT. THIS JOB CREATES A NEW FL15 AND A 002 

COMMENT. EINARY OECK OF 8231 IMFCRT 003 

LAEEL(FL15IN,R,L=8231IMP0RT,0=HI) 004 

REGUEST(FL15,N,HI) SCRATCH FOR NEW PL15 005 

LAEEL(FL15,W,L=8 231IMF0RT,D=HI) 006 

REWINC(FL15IN,FL15) 007 

UPGATE(F,P=FLlsIN,N=PL15) 008 

UNLCAC(PL15IN) 009 

UPDATE(Q,F=FL15) UPDATE IMPASSE ASSEMBLER 010 

UPDATE (G,C=TAFE1,P=PL15> UPDATE IMPORT 8231 HS Oil 

RUN(S,,, COMPILE,, ,40000) COMPILE IKFASSE 012 

RETURN (FL15) 013 

LDSET(LIE=RLN2F3/SYSIC/NUCLEUS> 014 

LGC. EXECUTE IMPASSE 015 

COMMENT. THE EINARY OF IMPORT HS IS WRITTEN ON TAPE2 016 

REWINC(TAF£2) 017 

COFYEF<TAFE2»FLNCHB> PUNCH 160A BINARY OECK 018 
7/8/9 END CF RECORD 

♦/ ACC CORRECTION HERE 020 
7/8/9 END CF RECORD 

♦CCMFILE,IMFASSE 022 
7/8/9 END CF RECORD 

♦ICENT YNK64CS 024 

♦YANK I864CS 025 

♦IGENT IMP8231 026 

*/ FCLLCWING CARDS ARE SAMPLE ONLY 027 

♦DELETE CHP21.1 028 

JCBLIM EGL 25 ADD JOB LIMIT DESIRED 029 

CRUNCH EGL 1 1 IF CARD PUNCH, C IF NONE 030 

♦DELETE CHF28.1 031 

♦DELETE 8231IMF.80,8231IMP.82 032 

CRCN EGL 3CO0 033 

CFCN EGL 4C00 034 

LFCN ECU 5000 035 

♦DELETE OHF36.ii0 036 

CCNTE £GU CISBCD 037 

♦CCMFILE,8231IMP 038 

7/8/9 END CF RECORD 

6/7/8/9 ENO OF FILE 



The output from this job will be a listing of 8231 IMPORT HS plus a binary 
deck of IMPORT for the 16 OA computer. The card numbered 1 in column 80 is 
a one-card loader read by the bootstrap program (step 2) which loads the 
program following it. This should be first card in the deck. The EOR 
card following card 101 (octal) must be discarded; the next EOR card 
remains as the last card. The IMPORT program cards that precede the 
second EOR card must be retained. The deck is ready for loading into the 
8231 system. 
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2. Enter the following program at location 7524 in bank 1: 

a. While holding BANK CLEAR button, press MASTER CLEAR. 

b. Set ENTER/SWEEP switch to ENTER. 
C. Set REL BANK to 1 (set bit 0) . 

d. Set register P to 7524. 

e. Set register z to the following values, pressing the RUN/STEP switch 
to STEP once after each value is entered. The value of the P 
register advances by one with the addition of each entry. 

0061 

7500 

6004 

2200 

xOOO (x is card reader/ equipment number) 

7677 

7500 

6020 

7202 

7656 

7536 

f . Both P and A registers should contain 7536. 

g. Neutralize all switches and MASTER CLEAR. 

3. Read the IMPORT binary deck: 

a. Set REL BANK to 1. 

b. Set register P to 7524. 

c. Place the IMPORT program binary deck in card reader. 

d. Press MOTOR POWER, RELOAD MEMORY, and READY buttons. 

e. Set RUN switch to run. 

f. When all cards are read in, neutralize RUN/STEP switch. 

g. Press MASTER CLEAR and set RUN/STEP switch to RUN. 

h. Computer will halt if typewriter switches are not up or if the DSC is 
net operating properly. 

i. //IMPORT READY is typed out and IMPORT HS will wait for operator to 
specify action to be taken. 
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If loading of the IMPORT binary deck stops before the last card is read, start 
again at step 1. 

A MASTER CLEAR followed by a RUN will re- initialize IMPORT. 

If END is typed, IMPORT can be placed in operation by placing the RUN/STEP 
switch tc RUN. 

VERIFICATION PROGRAM 

Remote terminal output from the 8231 IMPORT HS verification program which 
verifies communication with computer at the central site follows. This job 
requires less than one minute of 6400 computer clock time. 

SCOPE 3.4 07/14/72 

21.15.53.V323iOQ 
2i.l5.53.V823i,CM1000 0,T100. 
21.15. 53. 

21.15.53. THIS VERIFIES CORRECT INTERACTION OF 82 
21.15.53.31 IMPORT HS 
21.15.53. VIA INTERCOM 4. 1 
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RELEASE DESCRIPTION 

Participants of the APT Long Range Program have released Standard APT Systems 
tc the public domain; therefore, Control Data 6000 APr Version 2.2 is 
available to all 6000 users. Version 2.2 supersedes Version 2.1. 

HARDWARE CONFIGURATION 

125K (octal) of core is required to create the APT version 2.2 system, and 
6 5K (octal) of core is required to execute it. A minimum of 6 5K (octal) of core 
is required to compile the APT version 2.2 system. 

Three tape drives are required if all APT features are used; otherwise fewer 
tapes may suffice. 

RELEASE MATERIALS 

APT 2.2 is released under SCOPE 3.4 on program library tape PL16. 

m/-m--it f Tr>AfnT(->MO 

The release materials are now in UPDATE 1.2 program library format. 



CORRECTIONS 

Ail eligible PSR code (except AT20025, allowing compilation by FORTRAN 

3 4-H-»-*>-n/-rl-i DCD CnmmiVTi 'il'i Hoe? Ho e> y% ^dnlo^ *- r\ 7\ T3T» 

ADDITIONAL INFORMATION 

Post-processors can be handled in one of two ways: they can be installed on 
the SCOPE system library by making one entry per post-processor into the 
LBSRCH table. The routine DISPAT can be modified to call OVERLAY and run the 
post- process or from a separate overlay tape. 
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INSTALLATION PROCEDURES 

The APT release tape contains five files. File one is tne program library, 

file two is the compiled binary in relocatable format, fila three is compiled 
binary in absolute overlay format, files tour and five are the installation 
decks, and file six is the installation verification program. To obtain these 
card decks perform a job of the type: 

Job card. 

REQUEST PL16,E. MOUNT APT PL. 

REWIND PL16. 

SKIPF(PL16,3,17)* 

COPYBF (PL 16 , PUNCH, 3) 

UNLOAD PL 16. 

6/7/8/9 

Deck APT1 will serve as a program library maintenance deck in that it allows 
regeneration of the APT program library and binary file. Deck APT2 will use 
EDITLIB to enter APT into the running system either from the release tape or 
from a tape created by deck APT1. 

APT1,CM12500G,TF02,T3EQO. 001 

COMMENT. THIS JCB UPDATES AND CREATES THE BINARY OF APT 2.2 002 

COMMENT. THE FIRST FILE OF THE NEK PL16 WILL BE THE PROGRAM LIBRARY, 003 

COMMENT. FILE TWO KILL BE THE RELCCATA8LE BINARY FRIOR TO OVERLAY QQ<* 

COMMENT. FORMATION, AND FILE THREE WILL BE THE FORMED OVERLAYS. 005 

LAEEL(FLlfcI*,R,L=AFT2P2*3Pii,D=HI) 306 

REQUEST FL16,N,HI. SCRATCH FOR NEW PL16 007 

LAEEL(FL16,W,L = APT2P2*3P*t,D=HI) 008 

REWIND<FL16,FL16IN) 009 

UPCATE(D,F,F=FL16IN,N=PL16) 010 

UNLOAC FL16IN. 011 

RUN(S,,iC0i,CCMFILE,LIST,LGO,5 0G0GQ> 012 

REWIND FL16,LGC. 013 

SKIFF(FL16,1,17) Olij 

COFYEF(LGC,FL16,l) 015 

REWIND LGO. 016 

LOAO(LGC) 017 

NOGO. 018 

REKIND LIBTAP. 019 

C0FYEF<LIETAF,FL16,1) 020 

UNLOAD FL16. 021 
7/8/9 END CF RECORD 

*/ ADD CCRRECTIONS HERE 023 

*/ Q2*t 

*' 02£i 
7/8/9 EfvD CF RECORD 
6/7/8/9 END OF FILE 
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APT2,CM550CO,T700Q,MT1. 001 

COMMENT. THIS JCB TAKES THE APT V2.2 BINARY OVERLAYS AND EOITLIBS THEM 002 

COMMENT, INTO THE RUNNING SYSTEM FRO* THE PL16 TAPE. 003 

LAEEL(FL16,R,L=APT2P2*3P4,D=HI) MOUNT PL16 004 

REfcINO, FL16. 005 

SKIFF(FL16,2,17) 06 

C0FYBF<FL16,LIETAP) 007 

REHNC,PLie,LIETAP. 008 

UNLOAC(FL16) 009 

EDITLIE(SYSTEM) 010 

COMMENT. *** END OF JOB *** Oil 
7/8/9 END CF RECORD 

READY(SYSTEK) q 13 

LIERARY(NLCLELS,OLD> 01^ 

REFLACE(APT,LIETAP,AL=3,FL=650 0G,FLO=1) 015 

FINISH, 016 

LIERARY(SYSCVL,CLD) 017 

REPLACED, LIBTAF,AL=0) 018 

FINISH, 019 

COMPLETE. 020 

ENDRUN, 021 
7/8/9 END CF RECORD 
6/7/8/9 ENC OF FILE 

VERIFICATION PROGRAM 

Output from the verification program for APT 2.2 follows. Approximately 10 
seconds of real time are required to run this program. 

SCOPE 3.4 07/1^/72 

21.15.55.VAPT000 
2i.i5«55.VAPT s CM65GGQ,TiQ00. 

21.15.55. THIS SIMPLE PROGRAM VERIFIES CORRECT IN 
21.15.55.STALLATICN OF 
21.15.55. APT 
21. 15. 55. APT. 

21.17.25. 3.211 RT SECONDS LOAD TIME 

21.17.35. END OF JOB 
21.17.35.CPA 1.186 SEC. 

21. 17. 35. PP 10.986 SEC. 

21.17.35.10 1.475 SEC. 
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RELEASE DESCRIPTION 

6 000 EASIC version 2.0 runs under SCOPE 3.4. The minimum hardware 
configuration to operate EASIC 2.0 in batch mode is the minimum configuration 
required for SCOPE. The minimum hardware configuration to operate BASIC 2.0 
from a terminal is the minimum configuration for INTERCOM version 4.1. 

RELEASE MATERIALS 

The release materials for BASIC 2.0 are provided on program library tape PL17. 

CORRECTIONS 

All eligible PSR code as published through PSR Summary No. 312 has been 
included on the BASIC program library. 

ADDITIONAL INFORMATION 

BASIC 2.0 is designed to be operated primarily from a terminal with a normal 
moutc Ox. operation of compile to core and execute. Thus* the BASIC compiler 
also includes the fun time system which consists of one overlay. BASIC 2.0 
can be operated in batch mode allowing the generation of load-and-go files, 
etc, from a BASIC program. The installation deck also creates a relocatable 
copy of the run-time system which is used only if a BASIC program is executed 
via the leader. 

INSTALLATION PARAMETERS 



rsftDXL, z.u nas nu instaixatiun peitameterst tiuwevet, trie lruixuwing procedures 
may be used to make BASIC 2.0 compatible with BASIC 1.0 in the two areas where 
they differ. 

1. In BASIC 1.0, unary minus was performed first. In BASIC 2.0, it is 
performed following exponentiation. Thus -2**2 = 4 in BASIC 1.0 and -4 in 
BASIC 2.0. To perform unary minus first, the correction identifier UNMIN 
should be removed with the *YANK directive. 

2. In BASIC 1.0, the lower limit was zero for array dimensions; in BASIC 2.0, 
it is one. To allow a lower limit of zero, the correction identifier DIM 
should be removed with the *YANK directive. 



60307400 A 1-19-1 



INSTALLATION PROCEDURES 

PL17 contains five files: File 1 contains the program library; file 2 
contains the compiler in absolute binary; file 3 contains the compiler in 
relocatable binary; files 4 and 5 contain installation decks; file 6 contains 
the installation verification deck. 



The two installation decks 
performing the following job: 



and the verification program may be obtained by 



Job card, 
REQUEST (PL1 7, E) 
REWIND (PL17) 
SKIPF(PL17,3, 17) 
COPYBF (PL17 , PUNCH, 2) 
COPYBF(PL17,PUNCH, 1) 
UNLOAD (PL1 7) 
6/7/8/9 



MOUNT BASIC 2.0 PL 



SKIP PL AND BINARY DECKS 
PUNCH INSTALLATION DECKS 
PUNCH VERIFICATION PR03RAM DECK 



Job BASIC 1 is a maintenance deck which can be use to create a revised release 
format tape containing a modified program library and assembled binary. Job 
BASIC2 can be used to enter BASIC into the running system through EDITLIB 
either from the released tape or from the tape created by deck BASIC1. Job 
SCOPE3, described in section 1, then should be run to capture the running 
system on a deadstart tape. 
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BASICl,CM56000,T700C t NTQ2. 001 

COMMENT. THIS JCB UPDATES ANO CREATES THE BINARY OF BASIC 002 

COMMENT. THE NEW PL17 WILL CONSIST OF THREE FILES 003 

COMMENT. THE FIRST FILE WILL BE THE BASIC NEWPL 004 

COMMENT. THE SECCNO FILE WILL BE THE BINARY OF BASIC 005 

COMMENT. THE THIRD FILE WILL BE THE RELOCATABLE BINARY OF THE BASIC OVERLAYS 006 

LAEEL(FL17IN,R,L=BASIC2PQ*3P4, D=HI> MOUNT BASIC PL 007 

REQUEST, FL17,N, HI. SCRATCH FOR NEW PL17 008 

LAEEL(FL17,W,L=BASIC2P0*3P4,O=HI> 009 

R£WIND(PL17IN,PL17) 010 

UP0ATE(F,F=FL17IN,N=PL17,X> Oil 

UNL0A0(PL17IN> 012 

COMPASS(I=CCMFILE,S=CPCTEXT,L=0,B=EASIC00i 013 

COMPASS(I=CCMFILE,S=CPCTEXT-,L=0,B=BASRTS,S=IPTEXT) 014 

COMPASS(I=CCMPILE,S=CPCTEXT,S*IPTEXT,L=0) 015 

COMPASS(I-CCMFILE,S-CPCTEXT,L=0) 016 

COMPASS(I=CCMFILE,S=CPCTEXT,L=0) 017 

REWIND, EASICOO. 018 

REWINO,BASRTS. 019 

REWIND(LC-O) 020 

COFYBR<BASIC00,BASOVER»2> 021 

C0FYER<BASRTS,EAS0VER,9> 022 

COFYBF(LGO,EASCVER> 023 

LOAOCEASOVER) GENERATION OF OVERLAY BASIC 024 

NOGO. 025 

REWIND, EPSIC. 026 

REWIND, BASRTS. 027 

REWINC(EASCVER) 028 

SKIPF(PL17,1,17) 029 

C0FY6fi(EASIC,PL17) 030 

C0F¥BF(EASRTS,PL17) 031 

C0FYEF<EASCVER,FL17) 032 

UNL0ADCPL17) 033 

»/ ADO CORRECTIONS HERE 035 
7/8/9 END CF RECORD 
6/7/8/9 END OF FILE 

BASIC2,CM550Q0,T70QG»MT1. 001 

COMMENT. THIS JOB TAKES THE BASIC BINARIES FROM FL17 ANO EDITLIBS 002 

COMMENT. THEM INTO THE RUNNING SYSTEM. EITHER THE RELEASED VERSION OF 003 

COMMENT. FL17 CR THE VERSION CREATEO BY THE DECK BASIC1 MAY BE USED. 004 

LAEEL<FL17,R,L=EASIC2PQ»3P4,D=HI) MOUNT PL17 005 

REWIND, PL17. 006 

SKIPF(FL17,1,17) SKIP OLDPL 007 

COFYBR (FL17, BASIC, 1) BASIC CONTROL CARD CALLABLE ROUTINE 008 

COFYEF<FL17, BASICL) BASIC LIBRARY 009 

REWIND, PL17, BASIC, BASICL. 010 

UNL0ADCFL17) Oil 

EDITLIB(SYSTEM) 012 

COMMENT. *** ENO OF JOB *** 013 
7/8/9 END CF RECORO 

READY(SYSTEM) 015 

LIERARY(KUCLEUS,OLD) 016 

RE PLACE (*,B ASIC, AL=3,FL=4000 0,FLO=1) 017 

FINISH. 018 

LIERARY(SYSMSCOLD) 019 

REFLACE(*, BASICL) 020 

FINISH. 021 

COMPLETE. 022 

ENDRUN. 023 
7/8/9 ENO OF RECORO 
6/7/8/9 ENC OF FILE 
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VERIFICATION PROGRAM 

The verification program supplied with the release compiles and executes two 
BASIC programs in batch mode. The tirst verifies that the compiler has been 
installed correctly and the second that the relocatable version of the run 
time system has been installed correctly. 

Less than one minute is required to run the verification program deck after 
BASIC 2.0 has been installed. 

Output from the verification program follows: 



BASIC LIBRARY INSTALLED CORRECTLY 

THIS TEST DECK USED COMPILE TO LGO MODE 

THANK YOU FOR INSTALLING BASIC 2.0 

BASIC-6000 (2.0) BASICXX 07/18/72 21.15 HRS 

20 PRINTEBASIC LIBRARY INSTALLED CORRECTLYE 

30 PRINT 

40 PRINTETHIS TEST DECK USED COMPILE TO LGO M0DE = 

50 PRINT 

60 PRINTETHAKK YOU FOR INSTALLING BASIC 2.0= 

100 END 



BASIC INSTALLED CORRECTLY 

THIS DECK USED COMPILE AND EXECUTE MODE 



08/23/72 SCOPE 3.4 SVSN58CLEVEL OE 08/10/72 
05.45.18.YBASI4E 
Q5.45.18.VEASIC,CM550 0Q,T10 0. 

05.45.18. THIS SIMPLE PROGRAM VERIFIES CORRECT IK 
Q5.45.18.STALLATI0N OF 
05.45.18. BASIC 2.0 
05.45.18.BASIC(L) 
Q5.4€.43.EASIC(L,B,NI 
Q5.46.45.MAF(0FF) 
05.46.45.LGC. 

05.46.49. 3.075 RT SECONDS LOAD TIME 

05.46.51. END OF JOB 
05.46.51.CPA .184 SEC. 

05. 46. 51. PF 5.211 SEC. 

05.46.51.10 .287 SEC. 
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RELEASE DESCRIPTION 

ALGOL-60 Version 3.0 operates under the SCOPE 3.4 operating system. The 
minimum hardware configuration for ALGOL-60 is the minimum required by SCOPE. 



RELEASE MATERIALS 

The program library for ALGOL 3.0 is contained on the release tape PL18. 
tape also contains installation materials fcr ALGOL 3.0. 



This 



MODIFICATIONS 

The released default options during compilation include the F option (full 
ALGOL-60 checking). Under ALGOL 2.0 it was necessary to select F explicitly 
on the ALGOL control card. The ALGOL 2.0 default option now is represented in 
ALGOL 3.0 as the Q option. To achieve object code of maximum efficiency for 
debugging programs, it is necessary to select Q explicitly on the ALGOL 
control card. Installation parameters are provided for retaining the ALGOL 
2.0 characteristic of producing Q option code by default. 

A new control card parameter of the form, option=G, is provided for removing 
installation default parameters. Also, a message indicating all active 
options is produced after each compilation. 

It is no longer necessary for every call to a code bodied procedure to provide 
the same number of actual parameters. 

The restrictions on the kind of arithmetic expression permitted for control of 
an implied-f cr-loop in an I/O list have been removed. 

The N option is provided to suppress array bounds checking when the F option 
is active. 

CORRECTIONS 

ALGOL 3.0 incorporates all eligible PSR corrective code published in PSR 
Summaries up to and including Summary Number 312. 

LIMITATIONS 

The SCOPE control card REDUCE cannot be used when ALGOL programs are executed, 
since they use the space following the program as the stack area for all 
variables and for input-output buffers. For the same reason the REDUCE, OFF. 
command should be used whenever necessary for interactive execution. 

Segment mode loading (ALGOL control card options S, U, R, G) has been 
deactivated: attempts to use these options will result in job termination. 
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I NSTALLATI ON PARAMETERS 

Installation options are available in the following areas; 

Default compiler options 

Default execution- time options 

Graphic (character set) dependency 

The default compiler options are handled by a macro, ALGOL. The parameters of 
the ALGOL macro are the compiler control card options required to be on by 
default (without specification) . The release tape contains the following 
ALGOL call: 

ALGOL L,X r F 

To change these compiler defaults, the macrc parameters must be modified as 
follows: 

♦ DELETE, V3CCARD. 1 1 5 

ALGOL default options 

*COMPI IE , ALGOL , ALGO 

The default execution time options are handled by a macro, OPTIONS. The 
parameters are execution time options which are required to be on by default 
(without specification) . The parameters are provided in the same format as on 
an OPTIONS card. The release tape contains the following OPTIONS call: 

OPTIONS S=0,D=0,C=61,E~V 

To change these defaults, the parameters must be modified as follows: 

*DELETE,V3DEFB0.156 

OPTIONS default options 

*COMFILE,ALGLB00 

If the compiler is dependent on the installation graphic set selection, 
IF.CSET, the punched card codes corresponding to certain ALGOL symbols (less 
than, left bracket, and right bracket) will differ between installations 
having different values of IP.CSET. The 6 4- character set will be card code 
compatible with ALGOL 2.0. The release tape is configured to override graphic 
set dependency, to maintain compatible source decks, and to preserve maximum 
character representation of ALGOL symbols. Override is achieved by the 
following instructions: 

IPCHOVR SET 1 override true 

To establish a dependency on the value of IP.CSET the override must be turned 
off as follows: 

♦DELETE, V3CSET. 42 

IPCHOVR SET 
♦COMPILE, ALGOL, ALG1 
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I INSTALLATION PROC EDUR ES 



The ALGOL 3.0 release tape contains eight files. File 1 contains the program 
library in UPDATE 1.2 format. File 2 contains relocatable binary of the 
object time routines. File 3 contains the absolute compiler overlays. File H 
contains binary of ALGTEXT. File 5 contains the relocatable binary of the 
compiler. File 6 contains a maintenance program deck. File 7 contains an 
installation program deck. File 8 contains a verification program deck. The 
three program decks can be obtained by running the following job. 



Job card. 
REQUEST(PL18,E) 
SKIP? (PL1 8, 5,17) 
COPYBF(PL18,PUNCH) 
COPYBF(PL18,PUNCH) 
COPYBF (PL 1 8 , PUNCH) 
UNLOAD (PL1 8} 
6/7/8/9 



ALGOL 3.0 Release Tape 
Skip PL and binaries 
Punch maintenance program. 
Punch installation program. 
Punch verification program. 



The maintenance program, ALGOL 1 , produces an updated copy of the first five 
files of the release tape; it should be used for introducing installation 
parameters into the program library. Deck ALGOL1 requires access to the SCOPE 
program library tape. 

The installation program, ALGOL2, uses the tape produced by the maintenance 
program, or the release tape if no modifications are required, to enter ALGOL 
3.0 into the running system through EDITLIE. 

System text ALGTEXT is installed by execution of decks ALGOL 1 and ALGOL2. 



ALGGLijCM5cG0G,T7GGQ»MT02. 

COMMENT. ThIS JCB UPOATES AND CREATES THE BINARY OF ALGOL 

COMMENT. THE NEW PL18 WILL CONSIST OF FIVE FILES 

COMMENT. THE FIRST FILE WILL BE THE ALGOL NEWPL 

COMMENT. THE SECOND FILE WILL BE THE BINARY OF THE RELOCATABLE 

COMMENT. CF ROUTINES AND THE PP ROUTINES 

COMMENT. THE THIRO FILE WILL BE THE BINARY OF THE OVERLAYS 

COMMENT, THE FCURTH FILE WILL BE THE BINARY OF ALGTEXT 



REQUEST, FL1,E,HY. LATEST SCCFE PL 

UPCATE<F-PLijN-CPLjC-u*Q) 

UNLOAC(PLl) 

LAEEL(FL18IN,R,L=ALG0L3PQ*3P4, D=HI) ALGOL OLDPL 

RECUEST,FL18,N,HI. SCRATCH FOR NEW FL18 

LAEEL<FL18,W,L=ALGCL3FQ*3P4,D=HI> 

REkINC(PL18IN,FLi8) 

UPCATE(F,F=FL18IN,N=PL18,X) 

UNL0AC(FL18IN) 

COMFASS(I=CCMFILE,B=ALGOL,L = 0, S=CFCTEXT,S=IPTEXT) 

COMPASS(1=CCMFILE,S=SCPTEXT,B=ALGC,L=0,S=CPCTEXT,S=IPTEXT) 

COMPASS(I=CCMFILE,S=0*X=OPL,B=ALTEXT,L=Q> 

RE KING (ALGOL) 

LOAD(ALGCL) GENERATION OF ALGOL OVERLAYS 

NO GO. 

REMNCCALGCCMP) 



uui 
002 
003 
004 
005 
006 
007 
008 



COMMENT. THE FIFTH FILE WILL BE THE RELOCATABLE BINARY OF THE ALGOL OVERLAYS 009 



010 
Oil 
012 
013 
014 
015 
016 
017 
018 
019 
020 
021 
022 
023 
024 
025 
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REWINC(ALGC,ALTEXT> 026 

REWINCCALGCL) 027 

SKIPF(FL18,i,17> 028 

COFYBF(ALGC,PLi8) 029 

C0FYEF(ALGCCMF,FL18> 030 

COFYEF(ALTEXT,FL18) 031 

COFYEF(ALGGL,FL18) 032 

UNLOADCPL18) 033 
7/8/9 END CF RECORD 

*/ FRGDUCE RANDOM OPL 035 

*C CFC7EXT 036 
7/8/9 ENO CF RECORD 

*/ ADD CORRECTIONS HERE 038 
7/8/9 END CF RECORD 
6/7/8/9 END CF FILE 

ALGGL2,CM55C00,T7Q0,MT1. 001 

COMMENT. THIS JCB TAKES THE RELEASED VERSION OF ALGOL V3.0, OR THE 002 

COMMENT. VERSICN CREATED BY JOB ALGOL1, AND EDITLIBS THE BINARIES INTO 003 

COMMENT. THE RUNNING SYSTEM. 004 

LAEEL(FL18,R,L = ALGOL3P0*3Ptr,D=HI) MOUNT PL18 005 

REWIND, FL18. 006 

SKIPF<FL18,1,17> SKIP CLDPL 007 

COMMENT. 008 

COFYEF(FL18,ALGLB) ALGOL LIBRARY ROUTINES 009 

C0FYBR(PL18,ALGC,1) ALGOL CONTROL CARD CALLABLE ROUTINE 010 

COFYEF(FL16,ALGC> ALGOL OVERLAYS 011 

COFYEF(PL18,ALGTXT) ALGTEXT 012 

UNL0AD(PL18) 013 

REWIND(ALGLE,ALGC,ALGO) 014 

REWIND, ALGTXT. 015 

EDITLIE(SYSTEM) 016 

COMMENT. *** END OF JOB ♦** 017 
7/8/9 END CF RECORD 

READY(SYSTEM) 019 

♦/ 020 

LIERARY(NUCLEUS,OLD) 021 

REFLACE(ALGCL,ALGC,AL=3,FL=4000C,FLO=i) . 022 

RE FLACEC ALGTEXT, ALGTXT, AL=G> 023 

FINISH. 024 

LIERARY(SYSCVL,CLD> 025 

REFLACE(*,ALGC,AL=0) 026 

FINISH. 027 

LIBRARY(SYSMISCOLD) 026 

REFLACE(*,ALGLE) 029 

FINISH. 030 

COMPLETE. 031 

ENDRUN. 032 
7/8/9 END CF RECORD 
6/7/8/9 END CF FILE 
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VERIFICATION PROGRAM 

Dayfile cutput from running the installation verification program should 
appear similar to the following: 

ALGOL IS BEST 

SCOPE Z.k 
21.15.55. VALGCLO 
21.15.55.VALGOL,T100,CM560Q0. 
21.15.56.ALG0L<L,X) 

21.15.58. 1.653 RT SECONDS LOAO TIME 

21.16.01. 332 

21.16. 01. MAP(OFF) 
21.16.01. LGO. 

21.16.04. 2.604 RT SECONDS LOAD TIME 

21.16.06, END OF JOB 

21.i6.06.CPA .587 SEC. 

21. 16. 06. PP 4.624 SEC. 

END OF ALGOL RUN *V3. 0* 
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NORMAL OPERATING MODE 

1 . Press MC button. 

2. Press LOAD ADDR button. 

3. Enter 6400 via keyboard. 

4. Press STEP button. 

5. Press Bank 2 button. 

6. Press OPR MEM button. 

7. Press PROC MODE button. 

8. Press RUN button. 

9. Press ON LINE button. 

10. Dial 6000 computer via data phone. 

11. When connection is made, type LOGIN on the keyboard and press SEND button. 

12. Proceed as for normal INTERCOM communication. 
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SIMULA VERSION 1.0 21 



RELEASE DESCRIPTION 

SIMULA Version 1.0 runs under the SCOPE 3.4 operating system. The minimum 
hardware configuration required for SIMULA is the same as the minimum 
configuration required by SCOPE. 

RELEASE MATERIALS 

The updated program library for SIMULA is contained on the release tape PL19. 

CORRECTIONS 

All eligible PSR code as published through PSR Summary No. 312 has been added 
to the program library. 

LIMITATIONS 

Code procedures and direct files are not implemented. 

The SCOPE control card REDUCE cannot be used when SIMULA programs are executed 
because the space following the program is used as the stack area for 
variables. 

Segment mode loading (SIMULA control card options S, U, R, G) has been 
deactivated: attempts to use these options will result in job termination. 

SIMULA expects compiler input to conform to the SCOPE 63 character set 
(IP.CSET=IP.C63) . Accordingly, if the system is configured to a different 
character set, input must be translated to conform to the expected display 
code values for colon, less than, left bracket, and right bracket, 

GENERAL PROCEDURES 

To install SIMULA, the program library release tape can be used as input to 
produce a deadstart tape containing SIMULA. 

INSTALLATION PARAMETERS 

None. 
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INSTALLATION PROCEDURES 



The SIMULA 1.0 release tape contains six files. File 1 contains the program 
library. Files 2 and 3 contain relocatable binary object time routines and 
absolute compiler overlays, respectively. File 4 contains relocatable 
binaries of the compiler. Files 5 and 6 contain che installation decks; file 
7 contains the verification program deck. To obtain these decks, perform the 
job: 

Job card. 
REQUEST ( PL 1 9, E) 
REWIND (PL1 9) 
SKIPF(PL19,4, 17) 
COP YBF (PL 1 9 , PUNCH , 2 ) 
COPYBF(PL19, PUNCH, 1) 
UNLOAD (PL1 9) 
6/7/8/9 



Skip PL and Binary Files 
Punch Installation Decks 
Punch Verification Program 



Job SIMULA1 is a maintenance deck which can be used to create a revised 

release format tape containing a modified program library and assembled 

binary. Job SIMULA2 can be used to enter SIMULA into the running system 
through EDITLIB either from the released PL1 9 or from the tape created by deck 

SIMULA1. Job SCOPE3, described in section 1 then should be run to capture the 
running system on a deadstart tape. 

SIMULAl,CM5e0Q0,T7ClG0,MT02. 001 

COMMENT. THIS JCB UPOATES AND CREATES THE BINARY OF SIMULA 002 

COMMENT. THE NEW PL19 WILL CONSIST OF FOUR FILES 003 

COMMENT, THE FIRST FILE WILL BE THE SIMULA NEWFL 004 

COMMENT. THE SECOND FILE WILL BE THE BINARY OF THE RELOCATABLE 005 

COMMENT. CF ROUTINES AND THE PP ROUTINES 006 

COMMENT. THE THIRD FILE WILL BE THE ABSOLUTE BINARY OF THE OVERLAYS 007 

COMMENT. THE FOURTH FILE WILL BE THE RELOCATABLE BINARY OF THE OVERLAYS 008 

LAEEL(FL19IN,R,L=SIMULA1PQ*3P4,D=HI) MOUNT SIMULA PL 009 

REQUEST, PL19,N, HI. SCRATCH FOR NEW FL19 010 

LAEEL(FL19,W,L=SIMULA1P0*3P4,D=HI) 011 

REWINC<FL19IN,FL19> 012 

UPCATE<F,F=FL19IN,N=PL19,X> 013 

UNL0ACCFL191N) 014 

COMPASS(I=CCMFILE,S=IPTEXT,B=SIMB,L=0> 015 

COMFASS(I=CCMFILE,S=PPTEXT,B=SIMLE,L=Q,S=IPTEXT) 016 

REWIND, SIME. 017 

LOAO(SIMB) GENERATION OF SIMULA OVERLAYS 018 

NOGO. 019 

REWIND, SIPULAC. 020 

REWIND, SIMLE. 021 

REWINC(SIMB) 022 

SKIPF(FL19,1,17) 023 

COFYBF (SIMLE, FL19) 024 

C0FYEF(SIMLLAC,FL19) 025 

COFYBF(SIME,FL19) 026 

UNL0AC(PL19) 027 
7/8/9 ENO CF RECORD 

*/ ADC CORRECTIONS HERE 029 
7/8/9 END CF RECORD 
6/7/8/9 END CF FILE 
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SIMULA 

COWMEN 

GORMEN 

COfMEN 

LA EEL ( 

REMNO 

SKIPFC 

COWMEN 

COFYBF 

COFYBR 

COFYEF 

REWIND 

UNLGAC 

EOITLI 

COHMEN 

COKMEN 

7/8/9 

READY ( 

*/ 

LIERAR 

REFLAC 

FIMSH 

LIERAR 

REFLAC 

FIMSH 

LIERAR 

REFLAC 

FIMSH 

COMFLE 

ENCRUN 

7/8/9 

6/7/8/ 



2,CM550CG,T70G,MTi. 

T. THIS JOB TAKES THE RELEASED VERSION OF SIMULA VI. 0, OR THE 

T. VERSICN CREATED BY THE JCE SIMULA1, AND E0ITLI6S THE BINARIES 

T. INTO THE RUNNING SYSTEM FROM PL19. 

FL19,R,L=SIMULA1P0*3P4,D=HI) MOUNT PL19 

,PL19. 

FL19,1,17) SKIP CLDPL 

T. 

(FL19,SIKLBD SIMULA LIBRARY ROUTINES 

(FL19,SIKLC,1) SIMULA CONTROL CARD CALLABLE ROUTINE 

(PL19,SIMU0) SIMULA OVERLAYS 

,FL19,SIKLB,SIMUC,SIMUO. 

(FL19) 

E(SYSTEM) 

T. 

T. *** END OF JOB »** 

END CF RECORD 
SYSTEH) 

Y(NUCLEUS,OLD) 

E(*,SIMUC,AL=3,FL=**G0 0G, FLC=1) 

• 

Y(SYSGVL,CLD) 

E(*,SIMUC,AL=03 

Y(SYSMISCOLD) 
E(*,SIMLE) 

TE. 
• 

END CF RECORD 
9 END CF FILE 



031 
002 
003 
004 
005 
006 
007 
008 
009 
01C 
011 
012 
013 
014 
015 
016 

018 
019 
020 
021 
022 
023 
024 
025 
026 
027 
028 
029 
03C 



VERIFICATION PROGRAM 

Output frcm the SIMULA verification program is listed below: The time 
required to run this program is approximately 5 seconds of 6400 computer clock 
time. 



LIBRARY EXISTS 
LIBRARY 1 EXISTS 
LIBRARY 2 EXISTS 
LI8RARY 3 EXISTS 
GARBAGE COLLECTOR EXISTS 



END OF SIMULA RUN 
1 GARBAGE COLLECTIONS 
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SCOPE 3.4- 07/14/72 

21.15.59.VSIMUL0 
21.15. 59. VSIMULjT 100, CM5600 0. 

21.15.59. THIS SIMPLE PROGRAM VERIFIES CORRECT IN 
21.15.59.STALLATICN OF 
21.15.59. SIMULA 1.0 
21.15.59.SIMULA(L,X) 

21.17.15. 1.161 RT SECONDS LOAO TIME 

21.17.18.MAPC0FF) 
21.17. 18. LGO. 

21.17.23. 4.406 RT SECONDS LOAD TIME 

21.17.23. END CF JOB 

21.17.24.CPA .906 SEC. 

21. 17. 24. PP 4.148 SEC. 



1-21-4 60307400 A 



1700 MSOS IMPORT HIGH SPEED VERSION 1.0 22 



RELEASE DESCRIPTION 

1700 MSOS IMPORT HS Version 1.0 runs under the 1700 MSOS 3.0 operating system 
and operates in conjunction with INTERCOM 4.1 which runs under the SCOPE 3.4 
operating system. " 1700 MSOS IMPORT HS consists of modules written in 1700 
Assembly language. 

The 1700 computer is used as a remote terminal center which accepts jobs for 
6000 SCOPE in the same unit record format as the central site and provides 
identical unit record output within hardware limitations. 

Six simultaneous data streams, in addition to operator messages, are possible 
between the terminal and the central site. The data streams are restricted 
only by hardware configurations. 

RELEASE MATERIALS 

The 1700 MSOS IMPORT HIGH SPEED release consists of an UPDATE format program 
library tape including both MSOS IMPORT and the CLASS assembler. 

Product Description 

A brief description of each module of IMPORT HS designed to operate with MSOS 
3.0 is given below: 

IMMINT 

IMMINT is the standard MSOS Manual Interrupt module, which has been modified 
to divert all commands prefixed with a question mark (?) to CRIMPT (the Core 
Resident IMPORT) module. It also has been modified to accept messages of the 
length required by IMPORT HS. 

CRIMPT 

CRIMPT first determines whether or not IMPORT HS has been loaded. If so, 
CRIMPT diverts control to IMPORT. If not, CRIMPT loads IMPORT. 

IMPORT 

IMPORT goes through initialization and starts central to terminal message 
processing. 
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MESIMP 

MESIMP processes all terminal operator type-in messages. Directives are 
constructed and transmitted in accordance with typed- in instructions. Data 
streams are also defined, initialized, and terminated via this module. 

TRAFIC 

TRAFIC controls orderly routing of transmissions to and from the central site. 
Special directives and operator messages are given priority over data stream 
transmissions. 

TCPROC 

TCPROC controls terminal to central site data streams. These streams allow 
jobs to be submitted from either tape or cards. These jobs are identical in 
format to those submitted at the central site. 

CTPROC 

CTPROC processes all central site to terminal output (card punch and/or line 
printer) data. 

TPR 

TPR is the tape to printer utility routine. Data from the central site 
intended for the printer can be assigned to a tape unit and later printed out 
on the printer at the 1700 site. 

TPU 

TPU is the tape to punch utility routine. Data from the central site can be 
assigned to a tape unit and later punched cards can be produced at the 1700 
site. 

CTA 

CTA is the card to tape utility routine. This routine copies card images onto 
magnetic tape so that data can be prepared at the 1700 site for subsequent 
processing at the central site. 
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SPACE 

The MSOS SPACE program must be modified if normal MSOS job processing is to 
occur concurrently with IMPORT HS processing. This modification adds to 
alloca table core the amount of core expected to be used by IMFCRT HS. If this 
modification is not made, IMPORT HS will cause core-swapping which locks out 
job processing. 

DR1747 

This program operates as a normal MSOS device driver to handle read and write 
requests through the 1747 Multiplexer to the central site computer. 

HARDWARE CONFIGURATION 

The suggested minimum configuration for the 1700 MSOS IMPORT HS Terminals 
follows. This configuration does not allow concurrent job processing. 

1704 4K Computer 

1708 8K Storage Module 

1705 Interrupt Data Channel 

1706 Buffered Data Channel 
1747 Multiplexer 

1711 or 1713 Teletypewriter 

1726/405 or 1728/430 Card Reader/Punch 

1740/50 1 or 1742/HR300 Line Printer 

1573 Line Sync Clock 

1750 Data and Control Terminal 

1738 Disk Controller 

853/854 Disk Pack 

To allow concurrent job processing, the above minimum configuration may 
include the following; and depending on the number of defined data streams, an 
extra 4K of core storage may be required. 

1721/1722 Paper Tape Reader 

17 23/1724 Paper Tape Punch 
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Additional Equipment 

MSOS IMPORT HS will allow up to six concurrent data streams which may use any 
combination of the following: 

601/1731/1706 Buffered Magnetic Tape Units 

608/609/1732/1706 Buffered Magnetic Tape Units 

1726/405 Card Reader 

1728/430 Card Reader/Punch 

1742/HR300 Line Printer 

1740/501 Line Printer 

1729-2 Card Reader 

1729 Card Reader 

Communication Link 

Each terminal is connected to the central site by a communication link 
consisting of two DATAPHONE Data Sets 30 1B or 303, and one TELEPAK A 
communication line or their logical and physical equivalent. 

Logical Unit Assignments 

Any logical unit assignments acceptable to MSOS are suitable for IMPORT HS. 

MODIFICATIONS AND DEFICIENCIES 

A proper base has been established for introduction of 64-character set code. 

Limitations 

Before installation of 1700 MSOS IMPORT HS is attempted, all PSR summaries for 
INTERCOM 4.1 and MSOS 3.0 should be reviewed. 

16K SYSTEM 

SYSBUF Modification Kit - The 28 extra entries added to the scheduler stack 
SCHSTK are not required in a 16K system. 

When allocatable core is oversubscribed, jobs are written out on disk; and 
core used by these jobs is made available for allocation. 

In a 16K system, job processing is swapped out as soon as IMPORT is called. 
If several data streams are defined and released, small unusable fragments of 
allocatable core may remain. Defining the remaining data streams could result 
in the message //NO CORE before all six data streams are defined. Although 
the total fragments of core available could complete the remaining stream, not 
enough space is available in one block. 
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This same situation can occur if magnetic tape reading or writing takes place 
before all six data streams are defined. If IMPORT is called during job 
processing, some core is not available to IMPORT. 

In a 16K system, there may not be sufficient space to load the mass storage 
resident manual interrupt processor, MI PRO, which processes non-IMPORT 
commands. If the operator enters a non- IMPORT command, or mistakenly omits 
the ? prefix from an IMPORT command, MSOS attempts to load MIPRO to process 
the message. The core allocator finds no available core, and stacks the 
request until core is available. Under MSOS, such requests are not timed out 
and the request is never honored, No further manual interrupt is possible, so 
the operator cannot communicate with IMPORT, and a data stream cannot be 
released to make additional core available. This situation can also occur in 
any system where job processing has been locked out and a statement to job 
processing has been input. 

In such a case, the operator can change the equipment number on the Data Set 
Controller to retain the active background job processing. This causes the 
1747 driver to reject and type DSC REJ. Then IMPORT types //COM LOST, 
releases its core, and types IMPORT OFF. Core will be available then to 
complete the processing of the TTY command and job processing continues. 

INTERCOM treats this situation as though the IMPORT operator entered ?END. 
INTERCOM rewinds all attached output files putting them back into the output 
queue and discards all incomplete input files. 
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ADDITIONAL INFORMATION 

1. 1726/405 Card Reader Operation 

When a 1726/405 Card Reader is used, IMPORT HS cannot read the last card 
in the hopper. To ensure that the job is read completely, an extra end- 
of-file card (6/7/8/9 punches in column one) should be added to the end of 
the deck. IMPORT HS ignores multiple end-of-file cards, so extras will 
cause no difficulty. 

2. Job Completion Messages 

When a job finishes printing, 1700 MSOS IMPORT HS will produce the 
following messages on the teletypewriter: 

//LUxx jobname DONE where xx is the logical equipment device used 

3. Job Input Limit Bypass 

Only one terminal operator command affects the job limit. The various 
formats of the ?DVT command follow: 



Command 

?DVT 

?DVT, JOBNAME 

?DVT, JOBNAME, LP 

?DVT, ,LP 

?DVT, JOBNAME, CP 

?DVT,,CP 



Effect on job counter 

reset to zero 

decreased by one 

decreased by one 

counter is bypassed (no limit) 

no effect 

no effect 



Utility Routines 

The utility routines are executed as normal unprotected jobs and normally 
are resident on the program library. For installation procedures, see the 
general description. 

If an output device is defined and activated, but no output is available 
for the device, this message is typed out. 

//LUxx WAITING ON CENTRAL 

This message also may be output periodically when no visible activity is 
taking place to let the user know the output streams are still 
functioning. 

When ?WAIT is entered, the //OK. response indicates the wait bit has been 
set for the data stream; however, the data stream cannot enter the wait 
condition until any active requests are completed. Therefore, during the 
WAITING ON CENTRAL condition, a maximum of 30 seconds may elapse before 
?WAIT becomes effective. The ?GO command is invalid during this period. 
WAITING ON CENTRAL is the delay required for the data stream driver to 
time out. 
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GENERAL PROCEDURES 

1700 MSOS IMPORT HS is composed of modules written in 1700 Assembly Language. 
It runs under the standard MSOS 3.0 operating system. To install MSOS IMPORT, 
modules must be added to an existing working MSOS system. Utility functions 
are provided. 

INSTALLATION PROCEDURES AND PARAMETERS 

The 17 00 MSOS IMPORT HS release tape consists of 5 files. File 1 contains the 
source of MSOS IMPORT in Update 1.2 program library format. File 2 contains 
Update 1.2 program library format source of CLASS. A definition how to use 
CLASS to assemble MSOS IMPORT source on the 6000 is included at the end of 
this chapter. File 3 contains ECC cards of the SYSBUF Modification Kit to be 
used in modifying a workable MSOS SYSBUF to accommodate MSOS IMPORT, File 4 
contains binary of MSOS IMPORT. File 5 contains a MSOS IMPORT Verification 
program. 

To obtain the contents of files 3, 4, and 5 in card form, perform a job of the 
following for the 6000. 

Job card. 

REQUEST PL20,E. 
REWIND PL20. 
SKIPF(PL20,2,17) 
COPYBF (PL20, PUNCH) 
COPYBF(PL20 / TEMP) 
COPYBF (PL2 , PUNCH) 
REWIND TEMP. 
DISPOSE (TEMP,P8) 
UNLOAD PL 20. 
6/7/8/9 

To install MSOS IMPORT, an existing working MSOS system containing the desired 
hardware configuration must be available. MSOS IMPORT modules are added to 
these systems. Modify the existing MSOS system as follows: 

Replace the MSOS module MINT with the IMPORT variant of the module IMMINT, the 
Manual Interrupt statement decoder* To Core Resident MSOS add the routine 
CRIMPT. The following items should be added to MSOS SYSBUF (these cards are 
contained in the SYSBUF Modification Kit) : 



IMPSPD 


ADC 


DUMMY 


IMPTC 


ADC 


DUMMY 


IMPCT 


ADC 


DUMMY 


IMSTR1 


ADC 


DUMMY, DUMMY, DUMMY, DUMMY, DUMMY 


IMLAST 


ADC 


DUMMY 



The cards specified above are contained in the SYSBUF Modification Kit; they 
are added as the last items of table LOG1A after the card EQU LAST (*) and 
before the card NUMLU. 

The card with the comment IMPORT LOG1 ENTRIES should be added at the end of 
the LOG1 table. 

Three cards, the first of which has the comment IMPORT LOG2 ENTRIES, should be 
added at the end of the table LOG2. 
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Twenty-eight cards, the first of which has the comment 28 EXTRAS FOR IMPORT, 
should be added at the end of the scheduler stack SCHSTK, (before NUM 0,0 
$FFFF, scheduler stack entry 24). 

Six cards, the first of which has the comment UP TO 6 ENTRIES MAY BE PLUGGED 
BY IMPORT, should be added to the end of the diagnostic timer table, DGNTAB. 



The remaining cards of the IMPORT SYSBUF Modification Kit should be added at 
the end of SYSBUF. Some of the following may require change depending on the 
site configuration of the remote terminal: 



EQU IMPCOM(U) 
EQU R26(0) 



EQU P26(0) 



EQU IMPRI(6) 
EQU LUDSC(22) 
EQU PRIDSC(10) 

EQU BSIZE(165) 

IMTID ALF 1,ME 



IMPORT comment device logical unit 

If R26=0, all BCD cards are read as if punched by an 
026 keypunch. However, by punching the digits 29 in 
columns 79-80 of a job card or a 7/8/9 end of record 
card, the remaining BCD cards in that job are read as 
if punched by an 029 keypunch. The mode can be 
changed again by punching the digits 26 in another 
7/8/9 end of record card. 

If R26=1, all BCD cards are read as if punched by an 
029 keypunch. However, by punching the digits 26 in 
columns 79-80, the remaining BCD cards in that job are 
read as if punched by an 026 keypunch. The mode can 
be changed again by punching the digits 29 in another 
7/8/9 end of record card. 

If P26=0, all Hollerith cards will be punched in 026 
keypunch format. 

If P26=1, all Hollerith cards will be punched in 029 
keypunch format. 

Priority level at which IMPORT is to run 

Logical unit number of Data Set Controller 

Priority level at which the Data Set Controller is to 
run 

Default transmission buffer size; the only alternate 
is 325 

Default terminal ID. Although this parameter was 
essential for communication with EXPORT HS, it is 
ignored in communication with INTERCOM. 



INSTALLATION OF THE 1747 ESC DRIVER (DR1747) 

An entry of the form, ADC PH1747, should be added to table LOG1A at the 
positions corresponding to the interrupt line used by the 1747. Entry of the 
form, NUM 0, should be added to the table LOG1. 

An entry of the form, NUM $FFFF, should be added to the table LOG2. 
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The mask table, MASKT, should be modified by adding a 1 bit to the interrupt 
mask for all priorities lower than those at which the 1747 is to run. 

The entry, ADC PH1747, should be added to the table, DGNTAB. 



The code for the 174 7 Interrupt Response Routine and PHYSTAB follows: 





ENT 


11747 


LDQ 




JMF* 




EXT 




EXT 




EXT 


PH1747 


NUM 




ADC 




ADC 




ADC 




NUM 




ADC 




ADC 




ADC 



I SAVE 



NUM 

ADC 
ADC 
ADC 
ADC 
ADC 
ADC 
ADC 
RTJ- 



RTJ 
ADC 
ADC 
ADC 
ADC 
ADC 
JMP- 
TTYCMP LDA* 
STA- 
JMF+ 



11747 

=XPH1747 

(PH1747+2) 

IN1747 

CN1747 

EXV747 

$120A 

IN1747 

CN1747 

EX1747 

-1 




$1401 



$641 









0,0,0 





($F4) 



$C88 

TTYCMP 



4 

0. 



($EA) 

I SAVE 

I 





9 
10 
11 
12 
13-15 
16 
17 
18 



19 
20 
21 
22 
23 
24 
25 
26 
27 
28 



Interrupt response routine 



Initiator entry 

Interrupt entry 

Hang up entry 

Diagnostic clock counter 

Logical Unit or logical equipment 
designator 

PARAM conv, 

Q SETTING fcES: 

W: converter (bits 11, 12) 

E: equipment code (bits 7-10) 

S: director (bit 0-1) 

Switches 

Core 

LAST LCC + 1 

Status 

Used by MSOS 

TEMP 

IS AVE 

TTYREQ Teletypewriter request for diagnos- 
tic printouts after equipment 
failures 



TTYTHD 



and 29 



LOCORE MODIFICATIONS 

The following card should be added to the program LOCORE. 
EXT 11747 
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In addition, the interrupt slot for the interrupt line used by the 1747 should 
be set up as follows: 

LINExx NUM 

RTJ- ($FE) 

NUM PRI priority level 

ADC 11747 

PRIORITY LEVEL ASSIGNMENTS 

The multiplexer driver should run at a priority level higher than other I/O 
devices not subject to malfunction when their interrupts are not serviced 
promptly. It should be lower than that used by devices subject to such 
malfunction. The priority level at which IMPORT is run should be lower than 
that used by the Core Allocator, but not so low as to cause unnecessary delays 
at the central site. 

IMPORT MASS STORAGE RESIDENT MODULE 

This module is composed of the following routines: 

IMPORT 

TRAFIC 

MESIMP 

TCPROC 

CTPROC 

To add this module, the following modifications must be made to the system 
initializer input deck. 

*YM, IMPORT, xx 

where xx is the ordinal number of this Mass Storage Resident module. 

This card should be added to the other *YM cards at the beginning of the deck 
after the decks comprising the Mass Storage Resident module preceding IMPORT. 

*M IMPORT 

This is followed by the binary cards for the above named five IMPORT programs. 
Program IMPORT must be first. 

*S,xx,p,M 

xx is the ordinal of the IMPORT module. 

p is the priority level at which IMPORT runs 

letter M (not a variable) 

This card should be added to the other *S cards at the end of the 
initialization input deck. LIBEDT processes these cards by assigning the 
specified priority level to the module. 
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If simultaneous job processing is required, allocatable core area, AREAC, in 
program SPACE must be increased by the amount of core IMPORT will use when the 
streams have been defined. IMPORT occupies 5100 (decimal) core locations. 

Each line printer stream will require: 

1 100-word PHYSTAB 

2 6 9-word device buffers 

2 165- or 325-word transmission buffers 
Each card punch stream will require: 

1 100-word PHYSTAB 

2 60-word device buffers 

2 165-or 325-word transmission buffers 
Each card read stream will require: 

1 83-word PHYSTAB 

2 6 0-word device buffers 

2 165- or 325-word transmission buffers 

Assembly Options 

The user has the option of changing the transmission buffer size default value 
at installation time. 

TYPE- IN ACTION 

?IM carriage return TRANSMISSION EUEEER SIZE=165 

TRANSMISSION EUFFER SIZE=325 

JOBMAX contains the maximum number of jobs allowed in the system at any one 
time. When this number is reached, IMPORT will stop reading cards until a job 
is printed and leaves the system. The value in JOBMAX is arbitrary and can be 
made significantly larger or smaller to suit the needs of the application. 
The standard value is 25 (decimal). To modify this value by assembly, change 
the NUM value for JOBMAX. To modify it by using hexadecimal corrections, set 
the contents of the last cell in SYSBUF to contain the desired maximum value. 
This value may range from 1 to 32k. 
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The binary deck as provided is correctly set up to handle the 63-character 
set. If either of the 64-character sets is to be selected, modules MESIMP, 
TCPROC, and CTPROC must be reassembled and new binary decks produced, 
including the following changes: 

*D CHAROPT.6 

C64I EQU C64I(1) 

*C MESIMP, CTPROC, TCPROC 

Procedures for preparation of input to the MSOS Macro Assembler 2.0 are 
described in Section 25, 1700 SOURCE. Procedures for use of the CLASS 
Assembler on the CDC CYBER/70 are described at the end of this section. 

Utility Routine Installation 

Press: AUTO- LOAD 
1 . Move the STEP/RUN switch to RUN 

Message: PP 



Type: 


* 


Press: 


Carriag 


Press: 


Manual 


Message: 


MI 


Type: 


*LIBEDT 


Message: 


LIB 




IN 



2. Load binary card decks in card reader: 
Type: *K,I1u 1u is input device 

3. LIBEDT responds when loading is complete. 
Message: IN 

Type: *L, n...n n...n is program name at execution time 

4. To execute the program: 
Type: *n...n 

This loads the utility being called into core and begins execution. 
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1747 DSC CE Diagnostics 

If any of the following messages appear on the teletypewriter, a customer 
engineer should be consulted. 

BDC BUSY 

DSC BUSY 

DSC NOT READY 

NO CARRIER 

TEST MODE 

DSC REJECT 

BDC NOT READY 

(BDC is Buffered Data Channel) 
(DSC is Data Set Controller) 

These diagnostics are produced primarily for the customer engineer. They 
generally indicate a hardware failure rather than a software failure. 

Logical Terminal Assignments 

A terminal line number is determined by the physical connection. The unique 
two-character identifier associated with each line is established by INTERCOM 
when the terminal establishes communication. 

SYSBUF MODIFICATION KIT 

A complete listing of the SYSBUF Modification Kit is provided for general 
information only. 
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MSCSIMF,CM1QOOO,T50,P17. 

COMMENT. THIS JOB VERIFIES 17 00 MSOS AND INTERCOM HIGH SPEED INSTALLATION 

7/8/9 ENO OF RECORD 

NAM MOD KIT FOR SYSBUF 
♦TUS PCCULE IS NOT INTENDED TO BE ASSEMBLED 
♦IT CONTAINS CARDS TO BE ADDEO TO SYSBUF WHEN PSOS IMPORT 
♦IS ACCEC TO A SYSTEM 



* 


THE 


IMFSPD 


ADC 


IMFTC 


ADC 


IMFCT 


ADC 


IMSTR1 


ADC 




ADC 


IMLAST 


ADC 


* 




* 


THESE 




NUH 


* 




* 




* 


THESE 




NUP 




NUM 




NUM 


* 




* 




* 


THESE 




ADC 




ADC 




ADC 




ADC 




ADC 




ADC 




ACC 




ADC 




ADC 




ADC 




ADC 




ADC 




ADC 




ADC 




ACC 




ADC 




ADC 




ACC 




ADC 




ADC 




ACC 




ADC 




ADC 




ADC 




ADC 




ADC 




ACC 




ACC 



FOLLOWING 6 CARDS ARE TO BE ADDED AS THE LAST 9 ENTRIES IN LCG1A 
DUMMY IMPORT LOGiA ENTRIES 

DUMMY 
DUMMY 

OUMMY, DUMMY, DUMMY 
DUMMY, DUMMY 
OUMMY 

ENTRIES ARE TO BE AOCED TO LOG1 

0*0,0,0,0,0,0,0,0 IMPORT LOG1 ENTRIES 



ENTRIES ARE TO BE ADCED TO LOG2 

$FFFF,$FFFF,£FFFF IMPORT L0G2 ENTRIES 

$FFFF,&FFFF,$FFFF 

$FFFF,iFFFF,!bFFFF 



ENTRIES ARE TO BE ADCED TO THE SCHEDULER STACK-SCHSTK 



tOj 


»**2, 


>0 


► ♦»-2, 


* o 


► ♦ + 2, 


»c, 


► ♦ + 2, 


t 0, 


>*«-2, 


>c, 


^♦*2, 


tO 


► ♦ + 2, 


»Ci 


► ♦+2, 


t 0] 


► **2, 


»c 


»*»-2, 


tC 


► *+2, 


t Oi 


► ♦ + 2, 


»c 


,* 1-2, 


»c, 


► ♦*2, 


»c 


► ♦♦2, 


»0i 


>* + 2» 


»0i 


► **2, 


>c 


>**2, 


fC 


► ♦♦2, 


tC, 


i**2, 


»G, 


»**2, 


tC 


► ♦1-2, 


»o, 


(♦ + 2, 


rOi 


*+2, 


f Oi 


>*«-2, 


,0, 


»*»-2, 


»0i 


* + 2, 


»0i 


*+2, 



28 EXTRAS FOR IMPORT 
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THESE ENTRIES ARE TO BE ADDED TO THE DIAGNOSTIC TIMER TIMER TA8LE-CGNTAB 

UP TO 6 ENTRIES MAY BE PLUGGED BY IMPORT 



NIM 


SFFFF 


NLM 


SFFFF 


NLM 


SFFFF 


NLM 


SFFFF 


NLM 


SFFFF 


NUM 


SFFFF 



* THESE ENTRIES ARE THE 1747 DRIVER INTERRUPT RESPONSE ROUTINE AND 

* PHYSTAB-NOTE THAT ENTRY 7 SHOULO BE SET TO THE CONVERTER AND 

* EQUIPMENT NUMBER AT YOUR SITE 
ENT 117^7 

11747 ICQ =XFH1747 

JHF* CFH1747+2) 





EXT 


IM747 








EXT 


CN1747 








EXT 


EX1747 






PH1747 


NLM 


S120A 


C 






ADC 


IM747 


1 






ADC 


CN1747 


2 






ADC 


EX1747 


3 






NLM 


-1 


4 






ADC 





5 LU 




ACC 





6 PARAM CONV. 




ADC 


$1^01 


7 Q FOR EQUIP 8 BOC 1 




NUM 


$6kl 


8 






ADC 





9 






ACC 





10 






AOC 





11 


LAST LOC+1 




ACC 





12 


STATUS 




ADC 





13 


NO MASS MEM 




AOC 





14 


NO MM LENGTH 




ACC 





15 


RETURN INFORMATION FNR 




AOC 





16 


TEMP 


IS AVE 


AOC 





17 


ISAVE 




RTJ- 


(SF4> 


18 


TTYREQ 




NUM 


$C88 


19 






ACC 


TTYCMP 


20 






AOC 





21 


TTY THREAD 




ADC 


4 


22 






ACC 





23 






AOC 


C 


24 






JMF- 


(SEA) 


25 




TTYCttF 


LCA* 


ISAVE 


26 






STA- 


I 


27 






JMFf 
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UNCEF 

IPFI 

DSCPRI 

IMEFSZ 

P2629 

R2 629 

IMCOM 

DSCLU 



IMTID 
SYNCLI 
RETLIh 
JOEMAX 



THE FOLLOWING ITEMS SHOULD EE ADDED AT THE END OF SYSBUF 

EM IMPSPD,IMPCT,I*STR1,IMLAST,IMPTC 

ENT DSCLU 

DSCPRI 

IMCOM 

IPFI, IMBFSZ, IMTID 

UNDEF 

P2629,R2629 

OUMMY 

IMPRI 

PRIDSC 

BSIZE 

P26 

R26 

IMPCOM 



ENT 

EM 

ENT 

EM 

ENT 

ACC 

ADC 

ADC 

ADC 

ACC 

ADC 

ACC 
ACC LLCSC 

ENT SYNCLI 
ENT RETLIM 
ENT JOEMAX 



THE FOLLOWING ITEMS ARE DEFAULT CONDITIONS 



THEY SHCULD 
ECL 
EOL 
ECU 



BE CHANGED 
IMFCOM(if) 
R26<0> 
P26(0) 



TO SLIT 



YOUR SITES REQUIREMENTS AND CONFIGURATION 
IMPORT COMMENT DEVICE 
026-029 READ IND. (0=026) 
026-029 PUNCH IND. (0=026) 



ECU IMFRK6) 



ECU 

EGL 

EGL 
ALF i,ME 

NLM 
NLH -10 
NLM 25 



LUDSC(22) 

PRIOSC(iC) 
BSIZE(165> 

DEFAULT IMPORT 
-10 SYNCt-ERR 



TERMINAL 
LIMIT 



IC 



END 
7/8/9 END CF RECORD 
6/7/8/9 ENC OF FILE 



CLASS ASSEMBLER 



The CLASS ASSEMBLER is a CDC Cyber 70 version of the 1700 Macro Assembler. 
CLASS, written in COMPASS, provides assembly listings and binary object decks 
from 1700 Assembly Language source. 
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INSTALLATION 

The source of the CLASS Assembler is on the second file of the 1700 MSOS 
IMPORT source program library. The following deck is an example of a SCOPE 
3.4 job to install CLASS and its macro skeleton as permanent files in the 
SCOPE 3.4 system. 

CLASS, CM70000,T770,MT1. 

REQUEST (MT,E) 1700 MSOS IMPORT RELEASE TAPE 

REQUEST , CLASS , *PF . 

REQUEST , SMAC1 7 , *PF. 

SKIPF(MT, 1,15) SKIP MSOS IMPORT PL 

COPYBF(MT,PL) MOVE CLASS PL 

UPDATE (A, P=PL, N=OLDPL) 

UNLOAD <MT) 

UPDATE (Q) 

COMPASS (I, L=0,B=TEXT,S=0) ASSEMBLE KFONTXT 

UPDATE (Q) 

COMPASS (I, L=0,B=CLASS,G=TEXT) ASSEMBLE CLASS 

CATALOG (CLASS, CLASS, ID=CLASS,XR=CIASS) 

UPDATE (Q) 

CLASS(I,M=SMAC17,L=0) ASSEMBLE MACRO SKELETON 

CATALOG (SMAC 17, SMAC1 7, ID=CLASS,XR=CLASS) 

7/8/9 

*C KRONTXT 

7/8/9 

*C CLASS 

7/8/9 

*C SMAC 17 

7/8/9 

6/7/8/9 

ASSEMBLY OPTIONS 

The following CLASS features are additional to those found in the 1700 MACRO 
Assembler: 

1. Banner page at the head of each listing including: 

Address and length of program 

Address of END card 

All entry points with their addresses in alphabetical order 

All external symbols in alphabetical order 

All BZS/BSS blocks and addresses 



60307400 A 1-22-17 



2. TIDY option which lists the free-form input in specified columns on the 
output listing. 

3. Capability to print list control (LST,SPC,NLS,etc.) cards. 

4. Option to omit from the listing comment cards designated by an * in column 
1. 

5. Option to treat EJT cards as four spaces instead of a page eject. When a 
page is more than 3/4 full, the listing will be spaced to top-of-form. 

6. Option to suppress the listing of conditional code which is not generated. 

7. Option to suppress the listing of all but the first word of machine code 
generated by multiword instructions. 

8. Full cross-reference map with page/line number references. 

9. Option for a short cross reference map including only the value of the 
symbol . 

CLASS CONTROL CARD PARAMETERS 



Input 

Not specified 

I 

I=fname 

Output 
L 

L=fname 
L=0 



input on file INPUT 
input on file COMPILE 
input on file fname 



full list on file OUTPUT 
full list on file fname 
no list output 



Binary 

B or not specified binary output on file LGO 

B= fname binary output on file fname 

B=0 no binary output 

Binary output to be punched should be disposed to a file with free- form 
punch disposition (P8) . 



TIDY tab columns 
Not specified 

T=nnmmoo 



if list options specify T, tab columns will 

be 11-18-30 

TIDY columns are nn, mm, and oo; must be a six 

digit number. Example: T=081322 sets tab columns 

8,13, and 22. 
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List options 

LO = any combination of up to 7 of the allowable list options shown 
below. If more than 7 options are required, more than one LO= 
may appear on the control card. 

If no LO options appears, BMR and T are selected. When IO is specified, 
only the options requested are selected. 

LO=B list EZS/BSS blocks on banner page 

C list program list controls (EMT,SPC,etc. ) 

D suppress comment cards 

E process EJT as a page eject 

I list code skipped by an IFA pseudo op 

M list all entries on multiword entries 

R list full reference map 

S list abbreviated reference map 

T tidy the list file into specified tab columns 

X suppress macro expansion 

EXAMPLE ASSEMBLIES 

To assemble DR1747 from the 1700 MSOS IMPORT source program library: 

JOB,CM700G0,TP1. 

REQUEST (OLDPL,E) 1700 MSOS IMPORT SOURCE 

UPDATE (Q) 

ATTACH (CLASS, CLASS, ID=CLASS) 

ATTACH ( SMAC 1 7 , SMAC 1 7 , ID=CLASS ) 

CLASS(I,G=SMAC17) 

DISPOSE (LGO,P8) 

7/8/9 

...Any corrections 
*C DR1747 
7/8/9 
6/7/8/9 

To assemble a 1700 program with source on cards, TIDY tab columns 8,13,22, and 
no binary. 

JOB,CM70000. 

ATTACH (CLASS, CLASS, ID=CLASS) 

ATTACH ( SMAC 1 7 , SMAC 1 7 , ID=CLASS) 

CLASS (B=0,T=081322,LO=BTRM) 

7/8/9 

source program cards 
7/8/9 
6/7/8/9 

LIMITATIONS 

If a name with more than seven characters appears on an EXT card, the symbol 
will be treated as an entry point. 
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FORTRAN VERSION 2.3 23 



RELEASE DESCRIPTION 

FORTRAN Version 2.3 runs under the SCOPE 3.4 operating system. FORTRAN 
reguires the same minimum hardware configuration as SCOPE. 

RELEASE MATERIALS 

The released program library for FORTRAN 2.3 is known as PL21. 

CORRECTIONS 

All eligible PSR code published through PSR Summary 314 has been added to the 
FORTRAN program library. Additionally, idents FTC0147A (Summary 316) and 
FT3K12 5A (Summary 318) have been incorporated. 

LIMITATIONS 

All known deficiencies or limitations are reported in the PSR Summary as 
unanswered PSR's or as mentioned in memoranda accompanying this release. 

INSTALLATION PARAMETERS 

In the standard release of FL21, binary blocking code has been assembled into 
the I/O routines; the default condition fcr unformatted files is set to 
unblocked. To set the default condition for unformatted files to blocked, the 
identifier RM1567B should be removed by using the *YANK control card. If the 
identifier RM1567A is removed by *YANK, the code associated with binary 
blocking will not be assembled. The following two jobs demonstrate these 
assembly options: 
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JOB 1 Sets unformatted files default condition to blocked 

JOB(CM60000,T400,MT1) 

REQUEST (PL21 r E) FORTRAN 2.3 program library 

UPDATE (Q,P=PL21) 

RETURN (PL21) 

COMPASS (I=COMPILE,B=FEPLACE,L=0, S=CPCTEXT,S=IPTEXT) 

EDITLIB (SYSTEM) 

7/8/9 

*IDENT, BLOCK 
*YANK,RM1567B 
♦COMPILE, SYSTEM 
7/8/9 

REWIND (REPLACE) 

READY ( SYSTEM , OLD) 

LIBRARY (RUN2P3,OLD) 

REPLACE (*, REPLACE) 

FINISH. 

COMPLETE. 

ENDRUN. 

6/7/8/9 

JOB 2 Prevents assembly of code for binary blocking 

JOB (CM6 0000, T400,MT1) 

REQUEST (PL 2 1,E) RELEASE TAPE 

UPDATE (Q,P=PL21) 

RETURN (PL21) 

COMPASS (I=COMPILE,B=REPLACE,L=0,S=CPCTEXT,S=IPTEXT) 

EDITLIB (SYSTEM) 

7/8/9 

*IDENT,NOBLOCK 

*YANK,RM1567A 

♦COMPILE, IODEFS, SYSTEM, BACKSP,ENDFIL,IFENDF,INPUTB 

*COMPILE,OUTPTB,REWINM,SIO$,FTNBIN 

7/8/9 

REWIND (REPLACE) 

READY (SYSTEM, OLD) 

LIBRARY (RUN2P3,OLD) 

REPLACE (*, REPLACE) 

DELETE ($SIO$$$) 

FINISH. 

LIBRARY (SYS 10, OLE) 

REPLACE ($SIO$$$ , REPLACE) 

FINISH. 

COMPLETE. 

ENDRUN. 

6/7/8/9 
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A trigger value is used to trigger an access to an I/O device for blocked 
binary files. On input, it represents the number of buffer words that must be 
available before a read buffer request is issued; on output, it is the number 
of words that must be ready for output before a write buffer request is 
issued. 

The trigger value is set to a fixed percentage of the buffer length; however, 
if that percentage (or the remainder of the buffer) is less than one PRU, the 
PRU size is taken as the trigger value. The default is set to 80 percent; to 
change it, the value of the micro TRIGGER in SIO$ should be changed. For 
example, to change the triggering percentage to 50 percent: 

*DELETE , SCU3 1 6M. 94 
TRIGGER MICRO 1,0, /50/ 
♦COMPILE SIO$ 

The trigger value must be less than 100. 

INSTALLATION PROCEDURES 

The FORTRAN 2.3 release tape contains five files: file 1, the program 
library; file 2, assembled binary; file 3, installation deck V23RUN1; file 4, 
installation deck V23RUN2; and file 5, a verification program. 

V23RUN1 is a maintenance deck which can be used to create a revised program 
library and binary file. V23RUN2 can be used to enter FORTRAN 2.3 into the 
running system from either the released tape or a tape created by V23RUN1. 
Following completion of V23RUN2, job SCOPE3 (see Section 1) can be run to 
create a deadstart tape of the running systeir. 

To obtain the decks included as files 3-5, perform a job of the type: 

Job card, 

REQUEST (PL 2 1 , E) 

REWIND (PL21) 

SKIPF(PL21,2, 17) SKIP PL AND BINARY 

COPYBF(PL21,PUNCH,3) PUNCH INSTALLATION AND VERIFICATION DECKS 

UNLOAD (PL 21) 

6/7/8/9 

V23RUM,CM55CO0,T7CQO,MTO2. 001 

COMMENT, THIS JC6 UPOATES AND CREATES THE BINARY OF RUN 2.3 002 

COMMENT. THE FIRST FILE OF THE NEW PL2i WILL 8E THE NEWPL 003 
COMMENT. THE SECOND FILE WILL BE THE ABSOLUTE BINARY OF THE OVERLAYS AND THE 004 

COMMENT. THE FIRST FILE OF THE NSW PL2i WILL BE THE NEWPL 003 
COMMENT. THE SECOND FILE WILL BE THE ABSOLUTE BINARY OF THE OVERLAYS AND THE 004 

COMMENT. EINARY OF THE RELOCATABLE ROUTINES 005 

REGUEST FL2,E,HI. MOUNT LATEST CCMPASS PL 006 

REWIN0 FL2. 007 

UPCATE(A,P=FL2,N=C0MPC0M) 008 

UNLOAC PL2. 009 

LAEEL(FL21IN,F,L=RUN2P3*3P4,D=HlJ *UN 2.3 OLDPL 010 

REGUEST, FL21,N, HI. SCRATCH FOR NEW PL21 011 

LAEEL(FL21,W,L=RUN2P3»3P4,D=HI) 012 

REWING(PL21IN,PL21) 013 

UPCATE(F,F=FL21IN,N=PL21,E,X) QHt 
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UNL0AD(PL21IN) 015 

COMPASS(I=CCMPILE,S=CPCTEXT,S=IPTEXT,L=0) ACGOEF-RECOVRS 016 

COMPASS(I=CCMFILE,B=RUNN,S=CPCTEXT,S=IPTEXT,L=G> RUN-G8QDIAGP 017 

REWIND(RINN) 018 

RENIND(LGC) 019 

SKIPF(PL2i,l,17> 020 

COFYEF(LGC,FL21) 021 

BKSP(FL21,1) 022 

COFYEF(RUNN,PL2i> 023 

UNLOAC<FL2i> 024 
7/e/9 END CF RECORD 

»/ ADC CORRECTIONS HERE 026 
7/8/9 END CF RECORD 
6/7/8/9 END OF FILE 

V23RUN2,CM53000,T70C, MT1. 001 

COMMENT. THIS JOB EDITLIBS THE RUN V2.3 BINARIES INTO THE RUNNING 002 

COMMENT. SYSTEM FROM THE PL21 TAPE. EITHER THE RELEASED VERSION OR THE 003 

COMMENT. VERSION CREATED BY DECK V23RUN1 MAY BE USED. <♦ 

LABEL(FL21,R,L=RUN2P3*3P4,D=HI) MOUNT RUN V2.3 PL 005 

REWIND, PL21. 006 

SKIPF(FL21,i,17) SKIP OLDPL 007 

C0FYEF(FL21,RLNL) RUN V2.3 BINARIES 008 

RENINC,FL21,RUNL. 009 

UNL0ADCPL21) 010 

EDITLIE(SYSTEM) Oil 

COMMENT. »»* END OF JOB *** 012 
7/8/9 ENO CF RECORD 

READY(SYSTEM) 014 

LIERARY(RUN2F3,CLD) 015 

REFLACE(*i-kRITMS,RUNL} 016 

OELETE(GETeA) 017 

DELETE($SIO$$$) 018 

FINISH. 019 

LIERARY(NUCLEUS,OLD) 020 

REFLACE(RUN,RUNL,AL=3,FL=45 0C0,FLC=i) 021 

FINISH. 022 

LIERARY(SYSCVL,CLD) 023 

REFLACE(RUNi+Q8DIAGP,RUNL) 024 

FINISH. 025 

LIERARY(SYSIO,CLD) 026 

REWING(RLNL) 027 

REFLACE(GETBA,RUNL,AL=0) 028 

REFLACEUSICS$$,RUNL) 029 

FINISH. 030 

COMPLETE. 031 

ENCRUN. 032 
7/8/9 END CF RECORD 
6/7/8/9 END OF FILE 
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VERIFICATION PROGRAM 

Dayfile output of the RUN 2.3 verification program is as follows; 

SCCFE 3.«f 
Q5.45.28.VRUN04E 
Q5.^5.29.VFUK,C^55GG0,T2 0C. 

OS. 45. 29. THIS SIMPLE PROGRAM VERIFIES CORRECT IN 
05.45.29.STALLATION OF 
05.45.29.RUMG) 
Q5.45.32.LGC 

05.45.38. 4.353 RT SECONDS LOAD TIME 
G5. 45. 38. COMPUTATION SUCCESSFUL 
05. 45. 38. STOP 
05.45.38. RUN 2,3 
05.45.38. END OF JOB 
G5.ir5.38.CFA .444 SEC. 
05. 45. 38. PF 4.429 SEC. 
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1700 IMPORT HIGH SPEED VERSION 1.0 24 



RELEASE DESCRIPTION 

1700 IMPORT HIGH SPEED version 1.0 operates in conjunction with INTERCOM 4.1 
and runs under SCOPE 3.4. 

The 1700 computer is used as a remote terminal center which accepts jobs for 
6000 SCOPE in the same unit record format as the central site and provides 
identical unit record output within hardware limitations. 

Three simultaneous data streams, in addition to operator messages, are 
provided between the terminal and the central site. The data streams are 
restricted to one card reader and two printers. A flexible language allows 
the terminal operator to control his jobs at the central site. 

1700 IMPORT HS is written in 1700 Assembly language. It runs under a special 
operating system constructed from modules of 1700 Mass Storage Operating 
System (MSOS) . No utility functions are provided. 

RELEASE MATERIALS 

The 1700 IMPORT HS release consists of the following: 

IMPORT HS installation deck in binary format 

Two decks to establish proper character set orientation 

IMPORT HS Verification Program 

Source tape of 1700 IMPORT HS (optional) 

List tape of 1700 IMPORT HS (optional) 

Note: The source and list tapes do not correspond exactly to 
the binary deck. 

HARDWARE CONFIGURATION 

The minimum configuration for the 1700 IMPORT HS Terminal is as follows: 

1704 4K Computer A minimum of 8K core is required for 1700 

IMPORT HS, its operating system, and buffers. 
1708 4K Storage Module 

1705 Interrupt Data Channel 

1706 Buffered Data Channel 
1747 Multiplexer 

1711 or 1713 Teletypewriter 
1726/405 or 1728/430 Card Reader 
1740/501 or 1742/HR300 Printer 
60307400 C 1-24-1 | 



Hardware Options 

A second printer may be included in the basic configuration. 



Communication Link 

Each terminal is connected to the central site by a communication link 
consisting of two DATAPHONE data sets 301B or 303, and one TELPAK A 
communications line, or their logical and physical equivalent. 

Logical Unit Assignments 

The following are the logical unit assignments for 1700 IMPORT HS: 
Unit Number Device 

2 1728/430 Card Header 
or 

3 1726/405 Card Reader 

4 First printer 

5 Second printer (if any) 



Physical Unit Assignments 

The following are the physical unit assignments for 1700 IMPORT HS: 

Equipment Interrupt Line No. Equipment No. (hexadecimal) 

1706 Buffered Data Channel 
1747 Multiplexer 
1711 or 1713 Teletypewriter 
1728/430 Card Reader 

1726/405 Card Reader 

First Printer 
(1742/HR300 or 1740/501) 

Second Printer 
(1742/HR300 or 1740/501) 



N/A 


(first 


connection) 


14 




8 


1 




N/A 


8 = Data 




9 


9 = EOP 






10 = Alarm 






11 




4 


5 




F 
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MODIFICATIONS AND CORRECTIONS 



CORRECTIONS 



All eligible PSR code published through PSR Summary 320 has been added to the 
binary deck by addition of hexidecimal patch cards. 

Deficiencies 

The 17 42/HR300 Printer occasionally will lose an interrupt. IMPORT HS detects 
this and causes 1 the system to signal the operator: 

Lnn failed, 00 

ACTION 

nn is the logical unit number of the printer. The operator should respond 
with RP to repeat the request. 

Limitations 

If paper is torn or the supply is depleted, the 1742 rejects all functions 
including the clear interrupt, causing the same interrupt to be processed 
repeatedly until the system limits are reached. To recover, reload IMPORT HS. 

When paper is running low, the operator should instruct the system to idle the 

r> -r- A -^ -t- ^ t- Ktt <~«»\+- s\r~ 4 »-> /-t •?r.77VTfT / ry-r-i m-i- ^r~\ uln i 1 q +■ Vio n ou nanor ennnlu -i c; rpai^io^ _ 

When ready, enter ? GO, (printer) to activate printer. 

ADDITIONAL INFORMATION 

1. 1726/4 05 Card Reader Operation 

When a 1726/4 05 Card Reader is used, IMPORT HS cannot read the last card 
in the hopper. To ensure that the job is completely read, an extra end- 

Ui. ~ LJ.XC i*-" '' ,Jy_ J pUllV»llCO O-ii V^VSJLUIIUI VAlViJ JJ1UUJ.U J^^ uuu^u *-v^ >-ilV &1IU WJ- •.">- 

deck. IMPORT HS ignores multiple end-of-file cards, so extras will cause 
no difficulty. 

2. Print Complete Messages 

When a job finishes printing, 1700 IMPORT HS will prpduce the following 
messages on the teletypewriter: 

JOENAME LP1 DONE for the first printer. 

JOENAME LP2 DONE for the second printer. 

These messages are the 1700 IMPORT HS variant of the message: 
JOBNAME LP DONE 
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3. Restarting IMPORT HS 

17 00 IMPORT HS should be reloaded from the card reader each time it is 
executed. The autoload sequence should be checked each time to ascertain 
that core has not been cleared or used by another program. 

A restart procedure is available if IMPORT HS is terminated by ?END, or if 
the starting procedure stops before communication is established. To 
restart IMPORT HS, clear the machine and run. The regular initialization 
should be executed. If not, reload the deck. 

The above method is not effective if the system was stopped while IMPORT 
HS processing was active, in such a case, it is best to reload the deck. 

4. Job Input Limit Bypass 

The operator may enter ?DVT,,LP to divert all line printer output to the 
central site. When this statement is entered, the job input limit is 
ignored until the system is reloaded. Other versions of the DVT command 
do not cause the job input limit to be bypassed. In these cases, IMPORT 
HS does not have a true count of jobs in the system. 

5 . Overflow Light 

When IMPORT HS is entered, the . //IMFCET REAEY message appears, and the 
operator responds with ?WAIT or one of the options of the ?GO statement, 
followed by a carriage return. The IMPORT HS system sends an interrupt 
code to the central site and waits for an answer. During this idle 
period, before the central site answers the interrupt, a blinking overflow 
light on the console indicates that IMPORT HS is functioning properly. 

6. The IMPORT HS configuration available for checkout included a 501 printer 
with an ASCII print drum. 

GENERAL PROCEDURES 

Installation of 1700 IMPORT HIGH SPEED version 1.0 requires the following: 

1. Setting installation parameters for the remote terminal configuration, if 
necessary, and changing any preset parameters as necessary. 

2. Loading the IMPORT deck. 

3. Modifying core prior to executing IMPORT if necessary. 

INSTALLATION PARAMETERS 
None 
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HEXADECIMAL MODIFICATION ROUTINE 

If it is necessary to modify core prior to executing IMPORT, hexadecimal 
change cards must be inserted before the terminating *T card (in Hollerith 
format) of the released IMPORT deck. The format for these cards follows: 

Each modification card may have one or more 9-column change fields 
starting with an asterisk. The four succeeding characters should contain 
a hexadecimal address to be changed; the last four should contain the 
hexadecimal constant to be inserted into this location. Any number of 
blanks and/or commas may precede or follow each field; and the fields may 
contain only the characters 0-9 and A-F. If any others are used, results 
are unpredictable as no error checking is performed by the hexadecimal 
modification routine. The modification field must be completed by the end 
of a card, it cannot be continued to the next card. The *T terminator may 
be placed after all change fields of a modification card. 

Examples: 

*1234ABCD causes $ABCD to be placed in location 1234. Reading 
continues. 

*0001AAAA, *0002BBBB*0003CCCC*0004DDDD*T causes $AAAA, $BBBB, $CCCC, 
and $DDDD to be placed into locations 1, 2, 3, and 4, respectively; 
and IMPORT will be executed. 

INSTALLATION OPTIONS 

The following changes may be required based on the configuration of the remote 
terminal. The release deck is constructed for the minimum configuration: one 
1728/430 Card Reader and one 1742/HR300 Printer. If another configuration is 
used, the following hexadecimal corrections should be made to the release 
deck. 

$F9 contains the logical unit number of the card reader. It is set to 2 
for the 1728/43 0. It should be set to 3 to use the 1726/405 Card Reader. 

$FB contains the logical unit number of the first printer. It is set to 4 
in the release version. This is correct for the first printer, whichever 
type is used. 

$FA contains the logical unit number of the second printer, if available. 
The released version is set to since it assumes no second printer. If a 
second printer is to be used, set $FA to 5. 

$311 and $240 each contain the constant $2944 in the released version. 
This assumes 1742/HR300 printers or 1740/501 printers with ASCII type 
print heads. To print on a 1740/501 printer with a BCD type print head, 
change contents of $311 to $2844 for the first printer and/or change 
contents of $240 to $2844 if the second printer has a BCD print head. 
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The former installation option TERMID is no longer significant. Unique two- 
character identifiers are now assigned to each port of each HS MUX by the 
control site. 

MJILIM is the maximum number of jobs allowed in the system at any one 
time. When this number is reached, IMPORT will stop reading jobs from the 
card reader until a job is printed and leaves the system. The value of 
MJILIM is arbitrary and can be made significantly larger or smaller to 
suit the application. The standard value is 25(decimal). To modify this 
value by assembly, change the EQU value for MJILIM. To modify by using 
hexadecimal corrections, set cell INIT1 to the instruction ENA- MJILIM 
where the value may range from 1 to $7F or 127 (decimal) . For a larger 
limit, modify cells INIT1 and INIT1+1 to both contain OB01 (hexadecimal) . 
Then set low core cell $DB to contain the number of allowable jobs. This 
value may range from 1 to 32K. INIT1 is at location $0BE4. 

026-029 Keypunch. Core location $1693 in the release contains the command 
$EA2B which causes IMPORT to convert Hollerith to display, assuming 26 
keypunch code. If this location is changed to $EA4B, 029 code will be 
used. This option must be selected at installation time and cannot be 
overridden. 

PRESET PARAMETERS 

The following parameters may be modified as follows: 

SYNCCK is set to 10 (decimal) in the release version. This setting 
specifies that status is to be taken ten times upon an interrupt when a 
transmission occurs before a sync word acknowledge error is recorded. It 
provides a short time delay for the sync word acknowledge status bit to 
appear. To change this option by assembly, modify SYNCCK to the desired 
value. To change it with hexadecimal modifications, place the instruction 
ENA- SYNCCT in INTT in IMPORT. INTT is at location $0CC5. 

TRANCT is set to 120 (decimal) in the release version of IMPORT. When a 
sync word acknowledge error occurs, this count is reduced by one. After 
120 unsuccessful retransmissions have been tried, the routine switches to 
receive mode in an attempt to recover. To change this option, change the 
EQU value for TRANCT. To change it with hexadecimal corrections, change 
cell INTTP to contain the instruction ENA- TRANCT. INTTP is at location 
$0CD2. 

RECCYC indicates the number of times status is repeated before recording a 
cylic code error on input from the data set controller. It provides a 
short time loop allowing the cyclic code error bit to clear before 
registering the error. RECCYC is set to 3 (decimal) in the release 
version. To change it by assembly, modify EQU for RECCYC. To change it 
with hexadecimal corrections, modify INTP to contain the instruction ENA- 
RECCYC. INTR is at location $0CEF. 

Logical Terminal Assignments 

A terminal line number is determined by the physical connection. 
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INSTALLATION PROCEDURES 

Additions are required to the released binary deck to select the character 
set. To select the 63-character set, remove the header card and insert the 
6 3-character set hexadecimal patch cards ahead of the binary deck *T card. 

To select the 64-character set, remove the header card and insert the 64- 
character set hexadecimal patch cards ahead of the binary deck *T card. 

Caution: Only one of the above sequences of cards should be added. 

LOADING IMPORT DECK 

An autoload sequence must be keyed in as follows: 

1. Clear the machine, turn on the ENTER switch. 

2. Set P to LOC; for this version, use LOC=$1BF0. 

3. Set X to the first word of the autoload sequence below. 

4. Press the STEP key. 

5. Repeat steps 3 and 4 until all the following words are keyed in. 

Autoload Word Sequence 

Each of the fo^ ^ owi r,rr word must be ke* r ed i 10 ccmiprir'Q a f^^-M- /^ -! « /r ■•-/-* 4-v-ig a kqito 
procedure. 

E80D 
C80D 
3FE 
ODFE 
2FE 
0FC8 
7809 

no TTT? 

B807 

0107 

7806 

D8FE 

18F7 

04A1 (for 430 Reader, 0201 for the 405) 

0080 

6. Load the IMPORT deck into the 430 or 405 Reader and ready the unit. If a 
4 05 is used, a blank card must be placed after the last card in the deck. 

7. Put ENTER switch in neutral position. 

8. Set P to LOC and run. The deck will be loaded and IMPORT executed. 
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Punching the IMPORT Deck 

If the SKIP switch is on, at the time the IMPORT deck is loaded, a new IMPORT 
deck will be punched on the 430 before execution of IMPORT. This feature is 
useful if the number of modification cards is excessive, or if the original 
deck is in poor condition. 

If the original IMPORT deck is loaded from the 1728/430 card reader to punch a 
new deck, looping will occur after loading is completed, and before punching 
begins. To punch the new deck, clear the machine and set P to LOC+$DO and 
run. 

Loading the IMPORT Deck 

The following errors are detected and signaled by looping with register X set 
to $18FF at the following locations: 

LOC+S56 Deck out of sequence. An 8-bit sequence number is 
punched into rows 0-5, 11, and 12. 

LOC+$61 Incorrect record length. Row 2 of column 2 of each of the 
two records must contain a punch; this is the sign position 
of the coirpleirented record field length. 

LOC+$70 Checksum error. Deck read or punched incorrectly. 

DISK RESIDENT IMPORT 

Preparing a Disk Containing the IMPORT System 

Load a copy of the MSOS systems initializer and execute it to prepare the new 
disk. The following statements must be entered from the teletypewriter: 

*I,LU Binary input device definition 

*C,LU Comment device definition 

*V Begin reading input 

*T Final completion after all decks are read 
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Producing an IMPORT Deck from Disk 

If an IMPORT system has been constructed on disk and a deck is to be produced, 
the following steps are necessary: 

1. Turn on the SKIP switch. 

2. Autoload the disk; after setting the run switch in run position, the 
system will loop immediately. 

3. Key in the autoload sequence as specified previously in the section 
Loading IMPORT Deck. 

4. Put the first seven cards of the IMPORT deck into the 430 or 405 Reader. 
If the 405 is used, an extra blank card should be placed at the end of the 
deck. Then execute the autoload sequence. If the first seven cards are 
not available, they can be produced by assembling and executing the 
program BOOTLD. The first seven cards produced by this procedure can be 
used as specified above. The remainder of the output from the BOOTLD job 
is of no value and should be discarded. 

5. When reading terminates, clear the computer, turn off the SKIP switch, set 
P to LOC+$B0, and run. A complete deck will be punched and IMPORT 
reentered. All of core is punched up to the location preceding that into 
which the autoload sequence is entered. 

VERIFICATION PROGRAM 

The 1700 IMPORT HS verification program verifies communication with the 
central site computer. Running time is less than one minute of 6400 computer 
clock time. 
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1700/274 INTERACTIVE GRAPHICS SYSTEM (IGS) 25 

VERSION 2.0 



RELEASE DESCRIPTION 

The CONTROL DATA 1700/274 Interactive Graphics System (IGS) Version 2.0 
permits real time use, of the 6000 Series computers or CDC CYBER 70/Models 72, 
73, and 74 by a 274 Graphics Console operator while batch and remote jobs are 
running under SCOPE 3.4 and INTERCOM 4.1. 

The CONTROL DATA 1700 Series Computer is used to control the basic functions 
of the graphics hardware and allow the software to operate without programmer 
intervention. Terminals equipped with a remote card reader or card 
reader/punch and printer may be used to receive output and to submit jobs for 
execution at the central site. 

Programs written in FORTRAN, FORTRAN Extended, COBOL, ALGOL, COMPASS, and 
BASIC, as well as INTERCOM and IGS jobs may be run under the SCOPE 3.4 
Operating System. FORTRAN Extended is used to compile IGS jobs. 

IGS can service a maximum of 24 independent graphics consoles simultaneously 
through four 1700 Series computers. 

HARDWARE CONFIGURATION 

In addition to the minimum hardware required by 1700 MSOS IMPORT HS and the 

SCOPE 3.4 Operating System, 1700/274 IGS requires an additional 1706 Data 

Channel and 1-6 graphics consoles with 1744 Controllers for each 1700 
computer. 

RELEASE MATERIALS 

1700 IGS Version 2.0 source tape (OLDFL) is a labeled binary tape with 3 
files. 

File 1: UPDATE OLDPL source of the 1700 IGS modules and MSOS 3.0 IGS 
modification kit 

File 2: Binary installation deck 

File 3: Verification job deck 



60307400 A 1-25-1 



LIMITATIONS AND DEFICIENCIES 
Limitations 

1. Recovery Deadstart does not recover graphics jobs attached to 
consoles; each job is aborted or rerun. 

2. NC=ALL aborts all jobs attached to consoles, but it does not clear 
the NCON queue. 

3. A maximum of 2 IGS jobs may be queued for each console. 

H-. If an error fatal to the graphics data stream occurs on one 1700, 
graphics processing is suspended and the data stream must be 
redefined. All jobs using consoles attached to the 1700 are aborted. 

5. Response time is degraded when several consoles use one disk. 

6. Buffered magnetic tapes and the IGS/274 console cannot be run on the 
same 1706 Buffered Data Channel. 

Deficiencies 

1. Hard copy capabilities are not provided; however routines are 
available to create hard copies cf data on a device chosen by the 
installation. 

1700 INTERACTIVE GRAPHICS INSTALLATION PROCEDURES 

The release package, 1700 MSOS 3.0 IGS, is designed for installation in an 
MSOS 3.0 Operating System in which 1700 MSCS IMPORT HS has been installed. 

CUSTOMIZING MSOS 3.0 

Modifications to LOCORE and SYSBUF are discussed in separate sections. No 
changes to MSOS 3.0 other than LOCORE and SYSEUF customization are required 
for 1700 IGS. 

All PSR corrections to MSOS 3.0 and MSOS 3.0 IMPORT HS should be reviewed. 

CUSTOMIZING IMFORT HS FOR IGS 

MASS MEMORY ORDINAI OF IMFORT 

IGS increases the IMPORT mass memory module by adding three routines. As 
shown in the example, it may be necessary to add IMPORT as mass memory ordinal 
one or two before the loading of core resident *L DRCORE and *L DRIVERS is 
processed. This procedure gives the system initializer more room for loader 
tables while loading IMPORT to avoid overflow. 

The sample system memory map demonstrates the *YM control card changes and the 
deck sequence to load IMPORT at ordinal 2 in the system library. CRIMPT must 
be included in the *L LOCORE core resident load to avoid unsatisfied 
externals. 
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TRANSMISSION BUFFER SIZE 

Either transmission buffer size, 165 or 325, can be used for IMPORT when IGS 
is active. The larger size is more efficient and should be used unless 1700 
memory size limitations necessitate the smaller buffers. 

DIVERT BY TERMINAL ID 

The modified MESIMP provided with the IGS 1700 installation package recognizes 
a third parameter on the ?DVT command. This parameter allows remote files to 
be diverted to another remote terminal as well as to central site. To 
implement this terminal identifier parameter, the following change is required 
to TRAFIC. 

Reassemble module TRAFIC from the 1700 MSCS IMPORT source tape including the 
following corrective code: 

*D M30.4 NEAR TRAFIC. 2 

EQU IGS(1) ASSEMBLE DVT TID CODE 

*C TRAFIC 

LOCORE MODIFICATIONS 

The standard 1700 MSOS 3.0 LOCORE has been modified for IGS. DECK name 
IMODKIT on the OLDPL contains the source of the LOCORE modification kit. The 
LOCORE modification package supplies source card images to define the GRAPHICS 
communications region in LOCORE. After customization, the cards should 
replace LOCORE card image 000 48 (BZS $B2-$47+1) which defines the length of 
the free process control area in LOCORE. 

Example of 6000 or CDC Cyber 70 job to punch the IMPORT source cards from 
source OLDPL: 

JOB,CM40000,TP1. 

REQUEST (OLDPL, E) 1700 IGS OLDPL 

UPDATE (Q, 8) 

DISPOSE (COMPILE, PU) 

7/8/9 

*C IMODKIT 

7/8/9 

6/7/8/9 

Most examples in the following sections use specific numerical values for 
clarity. The actual values must be determined individually for each site. 

In LOCORE, an interrupt trap area should be added for each interrupt line 
connected to a 1744/274. Example for NCON=1: 

EXT DIGI1 
LINEn NUM 

RTJ- ($FE) 

$E is a sample priority level related 
NUM $B to the interrupt mask table. 
ADC DIGI1 DIGI1 is a sample interrupt processor 

entry in the PHYSTAE for a 1744/274. 
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For more than one 1744/2 74, additional interrupt trap entries are required. A 
second interrupt trap might appear: 

EXT DIGI2 
LINEm NUM 

RTJ- ($FE) 

NUM $B 

ADC DIGI2 DIGI2 is an entry point in the 1744/274 PHYSTAB 

for the second console. The interrupt trap source 
cards are not in IMODKIT. 

CUSTOMIZING LOCORE IGS MODIFICATIONS 

Two changes may be required to customize an installation: 

1. 274 consoles on the system should be represented by an entry in the 
TABLE OF LOGICAL UNITS of 274 CRTS. Each entry is the logical unit 
of the console and the table should have six entries. The first 
entry in the table will be console 1; the second console 2, etc. 
Console numbers should correspond to entries in word 23 of the 
PHYSTAB tables for the consoles in SYSBUF (SYSBUF modifications) . An 
ADC card should occupy the entry for every NCON not physically 
present on the system. 

2. The mask used to clear graphics interrupts should be set to a 16-bit 
hexadecimal number such that each bit representing a 1744/274 
interrupt line is clear and all others are set. 

Example : 

A 1700 terminal is configured with: 

1744/274 interrupt line 9 logical unit 15 

1744/274 interrupt line 10 logical unit 16 

Required changes to the IGS LOCOPE modification package: 

To establish the console numbers: 

*D IMODKIT. 27, 28 

NUM 15 LU NCON1 

NUM 16 LU NCON2 
*C IMODKIT 

To establish the INTERRUPT CLEAR MASK: 

*D IMODKIT. 50 

NUM $F9FF So that bits corresponding to 

interrupt lines 9 and 10 are clear. 
*C IMODKIT 

SOURCE OF IGS LOCORE MODIFICATIONS 

The source is available on the source tape as UPDATE DECK name IMODKIT. A 
Modification listing is included here for information only. 
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SYSBUF MODIFICATIONS 

An example of the PHYSTAB entry for a 1744/274 follows: Additional SYSBUF 
modifications include customizing the L0G1, I0G1A, and L0G2 tables. The 
interrupt mask table should be modified to reflect the addition of the 
17 44/2 74 interrupt lines. 



***** SAMPLE SYSBUF PHYSTAB ENTRIES FOR 1744/274 

* 

* NOTE THAT WORD SEVEN SHOULD BE CHANGED TO REFLECT THE EQUIPMENT 

* AT YOUR SITE 

*«*****4«* 1744 174 CONSOLE 1 ***************♦*♦**♦**♦♦**♦**♦***♦* 

* 

ENT DIGI1,DIGI2 

EXT DIGINI,OIGORV,DIG£RR 

DIGI1 LDQ =XPH2741 

JMP* (PH2741+2) 



PH2741 NUM 
ADC 
ADC 
ADC 
NUM 
NUM 
NUM 
NUM 
NUM 
NUM 
NUM 
NUM 
NUM 
AOC 
ADC 
ADC 
ADC 



$12BB 

DIGINI 

OIGDRV 

DIGERR 

-1 





S3E00 

SA6 

G 

















SCHEDULER REQUEST/PRIORITY LEVEL 

1 

2 

3 

4 

5 

6 

7 EQUIP C BDC 2 - Q REGISTER 

8 

9 

10 

11 

12 



13 MASS MEM LENGTH 0, DRIVER CORE RESIDENT 

14 MASS MEM SECTOR NAME 

15 FNR RETURN INFORMATION 
16 

THIS ADC POINTS TO THE NEXT AVAILABLE CONSOLE. 
IF THERE IS NO OTHER CONSOLE PRESENT IT POINTS TO ITSELF. 
ADCt PH2742 17 

18 

19 

20 

21 

22 

23 CONSOLE NUMBER MINUS 1 



ADC 
ADC 
NUM 
NUM 
NUM 
NUM 
EJT 



IMODK139 
IMODK140 
IM0DK141 

NUMBERIM0DK142 
IM00K143 

******IM00K144 
IM0DK145 
IM0DK146 
IM0DK147 
IMODK148 
IM0DK149 
IMODK150 
IM0DK151 
IMODK152 
IM0DK153 
IM0DK154 
IMODK155 
IM0DK156 
IM0DK157 
IM0DK158 
IMODK159 
IMODK160 
IM0DK161 
lM0DKib2 
IM0DK163 
IM0DK164 
IM0DK165 
IM00K166 
IM00K167 
IM0DK168 
IM0DK169 
IMODK170 
IMODK171 
IMODK172 
IM0DK173 
IM0DK174 
IMODK175 
IM0DK176 
IM0DK177 
IMODK178 
IM0DK179 



tlf multiple 1744/274 units are on the system, this address constant points to 
the PHYSTAB of the next console. If only one is present, it points to itself. 
In this example, if PH2741 is the only 274 PHYSTAB, the instruction will be 
ADC PH2741. 



Each 1744/274 in the configuration should be represented by an interrupt 
processor (EIGI1 above) and a PHYSTAB (PH2741 above). 
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For the second 1744/274 PHYSTAB, the last word will be NUM 1, as it always 
contains the quantity (NCON-1) . For the third PHYSTAB, the last word should 
be replaced by NUM 2, etc. 

Sample PHYSTAB entries are in DECK name IMODKIT in the 1700 IGS OLDPL. 

Step by Step Procedures for SYSBUF modification: 

1 . Customize the LOG1A table by placing 

ADC (PHYSTAB address) 

in the entry corresponding to the logical unit selected for the 174 4/274 
when the LOCORE modifications were customized. The entry should follow 
the EQU Lnn(*) card in LOG1A for the interrupt line of the 1744/274. 

For the example of PHYSTAB used in this section, the LCG1A entry would be 

ADC PH2741 

2. Add to LOG1 table 

ADC 
at the ordinal corresponding to the logical unit of the 1744/274. 

3. Add to LOG 2 table 

NUM $FFFF 

at the ordinal corresponding to the logical unit selected for the 
1744/274. 

4. The interrupt mask table, MASKT, should be customized so that the 
interrupt bit corresponding to the interrupt line of the 2744/274 is set 
in every priority up to, but not including the priority for the 1744/274 
in the interrupt trap region in SYSBUF. For example, if the 1744/274 is 
running at priority $B r as in the examples, the MASKT entries for 
priorities zero through ten ($A) must be changed. If the 17 44/274 is on 
interrupt line 8, this change requires adding $0100 (setting bit 8) to all 
the MASKT entries which must be changed. 

5. The 1744/274 entries should not be added to DGNTAB, the diagnostic timer 
table. 

6. The PHYSTAB, physical device table, should be added to SYSBUF. If the 
priority of the 1744/274 is other than $E, word zero of the PHYSTAB should 
be changed from 

TAG NUM $12BB to TAG NUM $12xx 

where x is the priority level chosen for the 1744/274. Word seven of the 
PHYSTAB should be customized to reflect the data channel and equipment 
code of the 174 4/274. 

The priority also appears in the interrupt trap region. That priority and 
the one in PHYSTAB must be the same. 
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CUSTOMIZING 1744 CCNTBCLLER SIZE 

The 1700 IGS system, as released, is configured for the following controller 
sizes: 

Console one 8K 

Console two 8K 

Console three 4K 

Console four 4K 

Console five 4K 

Console six 4K 

They may be changed by modifying the IGSPRO module before building the system 
or by entering a hexadecimal patch at initialization. 

MODIFYING IGSPRO 

The MAXBUF table in IGSPRO contains six entries, each corresponding to a 
possible 1744/274 in the configuration. Each entry in the table represents 
the last word address of the 174 4 controller corresponding to the console. 
For a 4K controller, this entry is $FFF; for an 8K controller, $1FFF. 

In the release source and binary, the table appears: 

MAXBUF NUM $ 1 FFF,$ 1FFF,$FFF,$FFF,$FFF. $FFF IGSPRO 1377 

The following UPDATE correction will modify IGSPRO to indicate that console 1 
and 2 are connected with 4K 1744 controllers. 

* I DENT, FOURK 

*DELETE, IGSPRO. 1377 

MAXBUF NUM $FFF,$FFF,$FFF, $FFF, $FFF, $FFF 

*C IGSPRO 

MAXBUF must have six entries. Values in the table that correspond to consoles 
not present in the configuration will not be used. 

HEXADECIMAL PATCH 

The following procedure, using the CDEBUG module, allows initialization 
patching of the table indicating the 1744 controller size. All type-in*s are 
followed by a carriage return. 

1. Initialize IMPORT, and establish communications with INTERCOM. 

2. Define a GRAPHICS data stream using the standard procedure; do not type 
?GO to initialize data transfer. 

3. Press the manual interrupt switch and enter DB to load the DEBUG package. 
DEBUG responds DEBUG IN. 
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4. Dump the contents of LOCORE cell $5D by typing DPC, 5D 
DEBUG responds 005D hhhh 

NEXT? 

The value dumped, hhhh, is the address of a table in IGSPRO. 

5. Add 5 plus console number (one to six) to the hhhh hexadecimal value just 
dumped. The result is the address of the MAXBUF entry for the console to 
be changed. aaaa = hhhh + 5 + console number. 

6. Store the last word address of the 1744 controller into aaaa (the result 
from step 5) by typing 

LHX, aaaa, size 

size is FFF for a four K controller and 1FFF for an 8K controller. 

DEBUG responds NEXT? 

7. Enter OFF to exit the DEBUG package. 

In the following example, the MAXBUF table is patched to indicate that console 
two is present on the configuration with a 4K 1744 controller. 

Operator Action 

Press manual interrupt 

type- in 



Press manual interrupt 
type-in 

Press manual interrupt 



MI 

?IM,,325 

//1700 MSOS IMPORT 

//CENTRAL READY 

//YOUR TERMINAL ID IS AC 

MI 

?DEF,GR,15 

//01. 00.00 OK 

//01. 00.00 CK 







MI 


type- in 




DB 
DEBUG IN 


type- in 




DPC,5D 
005D 3600 
NEXT? 


type-in 




LHX, 3607, FFF 

NEXT? 


type-in 




OFF 
DEBUG OUT 


Press manual 


interrupt 


MI 


type-in 




?GO 



The patch is stored in address 3607 which is the contents of address 5D plus 5 
plus console number, 2 for the example. All numbers and calculations used 
with DEBUG in the example are hexadecimal. 
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INTERACTIVE GRAPHICS 1700 BINARY INSTALLATICN PACKAGE. 

The binary installation and verification decks are on files 2 and 3 of the 
1700 MSOS 3.0 IGS tape, Example program to obtain the decks on cards: 

PUN,CM20000,TP1. 

REQUEST (O r E) 1700 IGS TAPE 

SKIPF(0,1, 15) 

COPYBF(O,P80C) 

COPYBF (O, PUNCH) 

6/7/8/9 

The binary installation package contains binary object decks and binary system 
initialization control cards. For installation, it should be separated into 
five sections. 

Separating the binary object decks by card count may lead to errors. The Mass 
Storage Operating System Version 3.0 Reference Manual contains a discussion of 
binary card format and relocatable binary format which may be referenced when 
separating the binary installation package into the proper set of object 
decks. 

1. System Initialization Control Cards 

The first 14 cards in the deck are *YM control cards for establishing the 
system library ordinals of 14 GRAPHICS overlays. It is assumed that the 
MSOS 3.0 operating system with MSOS IMPORT HS installed has 17 system 
library ordinals established. The control cards are: 



*YM»GI0Vi f 16 

*YMtGI0V2»19 

*YMtGIOV3t20 

*YMtGI0V4t21 

*YM,GI0V5»22 

*YM»GI0V6»23 

*YM,GI0V7>24 

*YM*GI0V8f25 

*YM,GI0V9»26 

*YM»GIOV10*27 

*YM»GI0vii»28 

*YMtGI0V12»29 

*YM,QUEUE»30 

*YM*GI0V13»31 



These control cards should be placed in the system initialization deck 
following the *YM control card which defines system library ordinal 17. 
If the number of system library ordinals is not 17 before IGS is 
installed, the *YM cards should be changed so that the IGS overlays will 
be the next 14 system library modules. 

The next 14 cards in the package are control cards of the form 
*S, ordinal, priority, M. They should be placed at the end of the system 
initialization deck with the other *S control cards, which establish the 
core priorities of existing system library modules (after the *T control 
card) . If the ordinals of the IGS overlays have been changed on the *YM 
control cards, the ordinal field of each *S card must be changed 
accordingly. 
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2. DIGDRV (2744/274 driver) Object Deck 

The next 30 cards in the package are a binary object deck of DIGDRV, the 
1744/274 driver. This deck should be placed in the system initialization 
deck so that it will be loaded in core resident. In the example on the 
following pages, DIGDRV is placed in the *L DRIVERS core resident load. 
As always, DIGDRV must precede SPACE, as the SPACE program must be the 
last core resident program loaded. 

3. MESIMP Object Deck (modified for IGS) 

The next 71 cards in the installation package are a binary object deck of 
the MESIMP module (Message Processor for IMPORT) as modified for IGS. 
This object deck should replace the binary of MESIMP installed with MSOS 
IMPORT HS. It must be part of the *M IMPORT load. 

4. IGSPRO, IDSGR, GRAPH, Modules to be Added to IMPORT 

The next 88 cards include three object decks, IGSPRO, IDSGR, and GRAPH, to 
be added to the IMPORT module. They may be added as the last three decks 
following the *M IMPORT control card and preceding the next system 
initialization control card. Routine IMPORT must be the first routine 
loaded in that module. 

5. IGS Overlays and Control Cards 

The remainder of the deck (557 cards) includes an *M control card and the 
binary object decks for each of 14 IGS overlays. These should be placed 
in the system initialization deck so that the order of the *M control card 
matches the ordinals on the *YM control cards previously inserted in the 
deck. 

In the example, the overlays are the last 14 mass memory resident system 
library routines in the installation deck. 

The order of the overlays in the IGS installation package matches the 
order of the routines on the *YM control cards included in the package. 

Summary of Deck Structure 1700 IGS Installation Package 

Binary *YM control cards 14 cards 

Binary *S control cards 14 cards 

Binary object deck DIGDRV 30 cards 

Binary object deck MESIMP 71 cards 
Binary object decks to be added to IMPOPT 

module (IGSPRO, IDSGR, GRAPH) 88 cards 

IGS overlays, control cards and object decks 557 cards 

The *M card to load GIOV1 specifies sector number 140 (base 16) to ensure that 
all primary IGS overlays are resident on the same disk cylinder, reducing disk 
repositioning time during graphics activity. If the system library loaded 
before GIOV1 occupies this sector, the *M card must be changed. 
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1700 SOURCE 

The source code of the IGS Version 2.0 routines which run in the 1700 system 
is provided on a magnetic tape PL17, together with MESIMP (a portion of the 
1700 Installation Package). The tape is in 6000 UPDATE OLDPL format 
compatible with UPDATE 1.2 under the SCOPE 3.4 Operating System. 

The source of the IGS modules and MESIMP is followed by *CWEOR,0. Following 
the conditional end of record is the DECK IMCDKIT containing 1700 IGS LOCORE 
and SYSBUF modifications. 

The first file on the tape is the OLDPL source. The sample job below 
demonstrates how the tape may be used to punch a source deck with sequence 
numbers from the COMPILE file of an UPDATE run. It also is possible to obtain 
card images with an UPDATE control card including the parameter C=PUNCH. 

Program PUN copies the first three characters of the UPDATE correction 
identifier to columns 73-75 of the card and places the UPDATE sequence number 
in columns 76-80. 

Sample Run to Create Card Source with Sequence Numbers 

UP1700,P4,T2000,CM45000,TP1. 

REQUEST, OLDPL ,E. 

UPDATE (Q) 

RUN(G) 

DISPOSE (TAPE2,PU) 

7/8/9 

^COMPILE, DIGDRV include any corrections to the module 

7/8/9 

PROGRAM PUN (PUNCH, COMPILE, TAPE 1=CCMFILE,TAPE2) 

DIMENSION IC(80) 

1 READ(1, 100) IC,IN 
IF (EOF, 1) 3,2 

2 WRITE(2, 101) (IC(I) ,1=1,72) , (IC (I) ,1=74,76) , IN 
GO TO 1 

3 STOP 

100 FORMAT (80R1, 16) 

101 FORMAT ( 7 5R 1 - 1 5) 
END 

7/8/9 
6/7/8/9 

If magnetic tape equipment is available on the 1700, PROGRAM PUN may be used 
to write a tape suitable for input to the 1700 Macro Assembler. The output 
tape should be an S tape at density suitable for the 1700 magnetic tape 
equipment. Example REQUEST card, placed before the RUN (G) control card: 

REQUEST (TAPE2,MT,S, HI) 

If TAPE2 is defined as magnetic tape, the DISPOSE control card must be 
removed. 

Procedures for the use of CLASS, a CDC CYEER 70 Version of the 1700 Macro 
Assembler, are described at the end of section 11-22. Either CLASS or the 
1700 Macro Assembler Version 2.0 may be used to maintain 1700 IGS. 
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Organization of routines in the IGS 1700 overlays and the corresponding source 
by UPDATE DECK name, as it appears on the release source tape: 



Overlay 

GIOV1 

GIOV2 

GIOV3 

GIOV4 
GIOV5 

GIOV6 
GIOV7 

GIOV8 



GIOV9 



GIOV10 



GIMAC 
GIOV12 

QUEUE 

GIOV13 



Routines 
Required 

*GIOV1 

RW 
*GIOV2 

RW 

RWAAT 
*GIOV3 

GICLR 

GIOV4 
*GIOV5 

RW 

RWAAT 
*GIOV6 

RWAAT 
♦GIOV7 

GIDISP 

RW 

RWAAT 
*GIOV8 

GIMASK 

GICLR 

GIAERT 

GUAN 

PUT 

RW 

RWAAT 
*GIOV9 

QUEUE2 

QUEUE3 

GIANS 

RW 
*GIOV10 

GITCON 

GITMMV 

GITIMV 

GIBRWT 

RW 

RWAAT 
♦GIMAC 

RW 
♦GIMACE 

RW 
♦QUEUE 

TRACD 

GIANC 
*GIOV13 

GIABRT 

GURSET 

GUAN 

PUT 

RW 



Co r r e s pon din g 
Source UPDATE 
DECK 

GIOV1 
+RW 

GIOV2 
+RW 
+RWAAT 

GIOV3 

GICLRA 

GIOV4 

GIOV5 
+RW 
+RWAAT 

GIOV6 
+RWAAT 

GIOV7 

GIDISPA 
+RW 
+RWAAT 

GIOV8 

GIMASK 

GICLR 

GIABRT 

GUAN 

PUT 
+RW 
+RWAAT 

GICV9 

QUEUE 2 

QUEUE3 

GIANS 
+RW 

GIOV10 

GITCON 

GITMMV 

GITIMV 

GIBRWT 
+RW 
+RWAAT 

GIMAC 
+RW 

GIMACE 
+RW 

QUEUE 

TRACD 

GIANC 



GIOV13 



♦The object deck for this routine must be the first binary in the overlay. 
-f-Although multiple copies of the object deck for these routines occur in the 
system, they correspond to one copy of source on the source tape. 
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SUMMARY OF REMOTE ACTIVATION SEQUENCE 

The operator loads MSOS IMPORT HS from the system disk to start operation. 
Jobs are input through the remote terminal's card reader. MSOS IMPORT HS is 
loaded at the terminal according to the following sequence. 

1. Set all console switches to neutral. 

2. Verify that: 

Previously prepared disk pack on the disk pack on the disk drive contains 
the operating system, MSOS IMPORT HS, and MSCS IMPORT HS IGS 

Disk and controller are on and ready 

DSC is on, all test switches are off, and the data set is plugged in 

Card reader, printers, and teletypewriter power is on 

1713 teletypewriter right-hand selector switch is set in the ON LINE 
position and that it is in K mode. 

3. Press the CLEAR switch on the computer console. 

4. Momemtarily press the AUTO LOAD button on the 1738 Disk Pack Controller. 

5. Momentarily set the RUN-STEP switch to RUN. At the teletypewriter, the 
typeout PP appears. 

6. Set the PROTECT switch to the PROTECT position. 

7. Press the BREAK REIEASE button and type an asterisk, followed by a 
carriage return. 

8. Press MANUAL INTERRUPT key each time a command is entered. 

9. MI is typed out each time in response. 

10. Clear breaklight. 

11. Enter command: 

?IM,,32 5 to initialize MSOS IMPORT HS. 

12. Press carriage return key. 
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13. The system responds as follows; 

//1700 MSOS IMPORT (MSOS IMPORT HS has been loaded) 

//NO COMM (Printed out every 30 seconds until central site 

responds) 

//CENTRAL READY (Communication has been established with INTERCOM) 

//YOUR TERMINAL ID IS AC 

14. To drop MSOS IMPORT HS at any point, enter the following command: (All 
commands must be followed by a carriage return and preceded by a manual 
interrupt) . 

?END 

This command may be entered also after the NO COMM message is received. 

15. Otherwise, press the MANUAL INTERRUPT key. 

16. MI is typed out. 

17. Typically, the next step is to assign a data stream as follows: 

?DEF,GR,lu (lu is the logical unit number of the data stream 
assigned.) 

18. Command is acknowledged: 
//hh.mm.ss OK 
//hh.mm.ss OK 

19. Additional data streams, such as one for the card reader, may be defined 
and acknowledged. If core is not available, the following message 
appears : 

//NO CORE 

If desired, another stream can be released to make core available. 

20. Enter command to activate data streams: 
?GO or ?GO,lu 

21. Command is acknowledged: 
//OK 
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22. The system is ready to receive and process graphics and batch data. The 
teletypewriter output produced should appear as follows: 

PP 
* 

MI 

?IM,,325 

//1700,MSOS IMPORT 

//CENTRAL READY 

//YOUR TERMINAL ID IS AC 

MI 

?DEF,GR,14 

///0. 20. 15. OK. 

///0. 20. 15. OK. 

MI 

700,14 

//OK 

IGS VERSION 2.0 VALIDATION DECK 

The deck may be input froir central or remote site. 

IMPORT must be active and communicating with INTERCOM, and the graphics data 
streams must be defined. 

When the job attaches the console, it displays: 

BUTTON 

ONE FOUR 

TWO FIVE 

THREE SIX 

BUTTON is a light button. The others are single picks. 

Pick one of the six single pick alphanumeric; it will be marked (blink). Pick 
BUTTON; it also will be marked. When the button request from the 6000 has 
been completed, both display items will be unmarked and the cycle may begin 
again. The validation deck prints out the data returned. 
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The following output should result from lightpen selection of: one, button, 
tv/o, button, three, button, four, button, five, button, six, button. 

BUTTON SELECTED 
STRTMG PICK 1 SELECTED 



R'lTTON SELECTED 
STRING PICK ? SEl ECTED 

BUTTON SELECTED 
STRTNG PICK 3 SELECTED 

BUTTON SELECTEn 
STRTNG PICK 4 SELECTED 

BUTTON SELECTED 
STRING PICK 5 SELECTED 

BUTTON SELECTED 
STRING PICK * 5F| ECTED 
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8-BIT SUBROUTINES VERSION 1.0 



26 



RELEASE DESCRIPTION 

8-Bit Subroutines Version 1.0 run under 6000 SCOPE 3.4 and 6000 Record Manager 
1 .0 . 

RELEASE MATERIALS 

The 8-Bit package is released on program library tape PL3 along with 6RM (6000 
Record Manager), IS (SCOPE Indexed Sequential) and DA (SCOPE Direct Access). 

A complete catalog of PL3 contents may be found in section 1-3. 

HARDWARE CONFIGURATION 

The 8-Bit package requires the same minimum hardware configuration as SCOPE 
3.4. An extended print train is required to print ASCII 96-character graphic 
files, if used. 

3ENERAL DESCRIPTION 

The relocatable routines from the 8-Bit package 1.0 run under SCOPE 3.4, 6RM 
1.0 with COBOL 4.0 or FORTRAN Extended 4.0 or COMPASS 3.0. COPY8P, a stand- 
alone routine used to print 360/370 print files, is control card callable and 
runs under SCOPE 3.4. 

INSTALLATION PROCEDURES 

PL3 contains 26 files, files 10-13 and 23-26 apply to the 8-Bit packages A 
complete PL description appears in section 3 of this document. 

Files 23-26 may be obtained as follows: 

Job Card 



REQUEST (PL 3, E) 
SKIPF(PL3, 22,17) 
COPYBF (PL3 , PUNCH, 2) 
COPY BF (PL 3, PUNCH, 2) 
UNLOAD (PL3 ) 
6/7/8/9 



mount tape PL3 
skip 22 files 
2 installation decks 
2 verification decks 
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The installation decks are listed below: 

Deck BIT81 is a maintenance deck that allows updates of the 8-Bit package 
routines on the PL3 tape. This deck updates the 8-Bit program library, 

assembles the 8-Bit relocatable object routines, assembles COPY8P and creates 
a new COPY8P absolute overlay. The job essentially allows creation of a 
revised PL3 release tape. 

Deck BIT82 adds the 8-Bit package to the running system. Relocatable object 

routines are put in the SYSIO library. COPY8P becomes part of the NUCLEUS 
library. Deck SCOPE3, described in the SCOPE section of this document, then 
can be run to create a deadstart tape of the running system. 

The T6 00 parameter on the BIT81 job card has been found to be insufficient on 
a 6200 or 6400. Please increase the value to T1400. 

BIT81,CM65QG0,T600,MT2. 001 

COMMENT. THIS JOB UPDATES ANO CREATES BINARIES OF 8 BIT SUBROUTINES 002 

COMMENT. AND COPIES THE OLDPL ANO BINARY OF 6RH, IS AND OA TO THE NEW 003 

COMMENT. FL3C. THE NEW PL3C WILL CONSIST OF 13 FILES AND 8-eiTS BEGINS 004 

COMMENT. WITH FILE 10. 005 

COMMENT. FILE 10 WILL BE THE 8 •BIT NEWPL WITH A »HEOR BETWEEN 006 

COMMENT. OBJECT-TIME ROUTINES AND CONTROL CARD CALLABLE C0PY8P. 007 

COMMENT. FILE 11 WILL BE RELOCATABLE BINARIES CF OBJECT-TIME ROUTINES. 008 

COMMENT. FILE 12 WILL BE RELOCATABLE BINARY OF C0PY8P. 009 

COMMENT. FILE 13 WILL BE CONTROL CARD CALLABLE C0PY8P IN OVERLAY. 010 

LAEEL(FL3CIh,R,L=RM*3P4,D=HI> 011 

REGUEST,FL3C t *,HI. SCTATCH FOR NEW PL3C 012 

LAEEL(FL3C,W,L=RM*3P4,D=HI> 013 

REWINC<PL3CIN,PL3C) 014 

C0FYBF(PL3CIN,FL3C,91 POSITION TO 8-BIT OLDPL 015 

UP0ATE(F,P=FL3CIN,NsPL3C,R,X) 016 

COFYEF<ECF,FL3C> 017 

UNL0AC<PL3CIfc> 018 

REWINC(CGMFILE) 019 

C0MPASS(I,S=I0TEXT,S=IPTEXT,LsQ,B*PL3C) OBJECT ROUTINES 020 

C0FYBF(E0F,FL3C) 021 

COMPASS(I,S=ICTEXT,S=IPTEXT,L=0,B=CPY8> 022 

REWIN0<CPY81 023 

COFY6FCCPY8,FL3C> 024 

L0AD(CPY8) 025 

NOGO. 026 

REWIN0(C0PY8P) 027 

C0FYEF(CCPY8F,FL3C) 028 

UNLCACCPL3C) 029 
7/6/9 ENO OF RECORD 

*/ ADO CORRECTIONS HERE 031 

*C PARSE 032 
7/8/9 ENO OF RECORD 
6/7/8/9 ENC OF FILE 
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BIT82,CfH»5QQ0fT50,MTi. 001 

COMMENT. THIS JOB EDITLIBS THE 8-EIT BINARIES FROM 002 

COPMENT. THE RELEASED 8-BIT PL OR THE PL CREATEO BY DECK BIT81. 003 

LAEEL(PL3C,R,L=RM*3P4,D=HI) MOUNT PL3C 00^ 

SKIPF(FL3C,10,17) SKIP 6RM, IS, OA AND 8-8IT FL 005 

COFYEF(FL3C,EIT8) RELOCATABLES 006 

SKIPF(FL3C,i,17) SKIP C0PY8P RELOCATABLES 007 

COFYBF(PL3C,CPY8> COPY8P OVERLAY 008 

REHNG(EIT8,CFY8) 009 

EDITLIE(SYSTEM) Q10 

UNLCAC(FL3C) 011 
7/8/9 END CF RECORD 

READYCSYSTEM 013 

LIERARY(NUCLELS,OLD) 01 4 

REFLACE(»,CPY8,AL=1,FL=13300,FLO=1) 015 

FINISH. 016 

LIERARY(SYSIC,CLO) q 1? 

REFLACE(»,EIT8) 018 

FINISH* 019 

COMPLETE. 020 

ENCRUN. 021 
7/8/9 END CF RECORD 
6/7/8/9 END CF FILE 

VERIFICATION PROGRAMS 

Dayfile output as produced by running the two verification program jobs is 
listed below. 

SCOPE 3.*+ 
21,15, 07. VALSBIT 
2i.i5.08.VAL88IT»CM65G00»T10C. 
21,15,08. COBOL(LRM) 

21,16.08. 1.875 RT SECONDS LOAD TIME 
21. 16. 12. COMPILING NESTED 

21.16.23. 000 E ANO T/U DIAGNOSTICS ISSUED 
21.16.23. FIELD LENGTH NEEDED FOR COBOL 053100 
21.16.25. 1.093 CP SECONOS COMPILATION TIME 
21.16. 25. END COBOL 

21.16.25.FILE(TAPE01,BT=K,RT=U,RB=1,MBL=27 0,MRL=2 
21.16.25 S 70,CM=NO) 

21. 16. 26. REDUCE. 

21.16. 26. LDSET(FILES=TAPE01) 

2i.16.27.LG0. 

21.16.53. NON-FATAL LOADER ERRORS - SEE MAP 

21.16.57. 30.852 RT SECONOS LOAD TIME 

21.17,05. 8 BITS ROUTINES VALIOATE 

21.17, 06. CPA 5.597 SEC. 

21. 17. 06. PP 22.840 SEC. 

SCOPE 3.4 
21.15.0<».VLCPY8P 
21.15.0 4.VLCP>8P,CM15 0,T4 0. 
21.15,04.COPY8P(IN1,IN2,CODE=A> 
21.15.05. C0PY8P VALIDATES 
21.15, 05. CPA .004 SEC. 

21.15. 05. PP .639 SEC. 
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MARS VI VERSION 2.1 27 



RELEASE DESCRIPTION 

MARS VI, Multi-Access Retrieval System for 6000 Series computers, is a data 
management system which allows a user to organize data in the computer, store 
it, and retrieve s and/or modify all or any specified part of the data. The 
language follows simple English syntax, facilitating use of the system by non- 
programmers. MARS VI provides extremely rapid retrievals; it operates from 
remote terminals as well as from the central site. It allows batch mode 
processing under SCOPE 3.4 as well as Teletype or 200 User Terminal 
interactive processing under INTERCOM, Version 4.1. 

Version 2. 1 includes relocatable subroutines that can be called from a COBOL 
program to access the data base. MARS VI is a central memory application 
program operating under the SCOPE 3.4 Operating Sysstem in conjunction with 
RUN FORTRAN Version 2.3, COMPASS 2.0 assembler and FORTRAN Extended Version 
3.0. The MARS VI system has no peripheral processor routines. 

HARDWARE REQUIREMENTS 

Central memory requirement is 49,152 decimal words; otherwise the minimum 
configuration for MARS VI is the same as for SCOPE 3*4* 

RELEASE MATERIALS 

MARS VI is released on an Update program library. 

LIMITATIONS 

1. Minimum octal field lenath reauirpmpnt-c; fr>r +ho Map.Q \?t mz-^i-n 
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LOADER 62K 

RETPIEVAL 55K 

REPORTER 55K 

UPDATE 65 K (non-key updates) 

2. When absolute overlays are being prepared, at least 105000 (octal) field 
length is required. 

3. When index tables of a partially inverted file are on permanent files, the 
user must make certain he has EXTEND and MODIFY permissions before using 
the UPDATE module, or he may destroy his data base. 

4. The validation deck will not execute properly unless COBOL interface has 
been installed. 

5. No embedded blanks are allowed in arithmetic expressions. 
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INSTALLATION PROCEDURES 

The release tape for MARS contains eight files. File 1 contains the program 
libraries; file 2 contains binary of MARS in absolute overlay format; file 3 
contains the COBOL interface in a form which may be cataloged as a permanent 

file; file 4 contains the same information as file 2 but in relocatable 
format. Files 5-8, which contain the necessary installation and verification 
decks, may be obtained by running a job of the type: 

job card 
REQUEST, PL23,E. 
SKIPF(PL23,4,17) 
COPYBF ( PL2 3 , PUNCH , 4 ) 
UNLOAD, PL2 3. 
6/7/8/9 

Job MARS1 performs program library maintenance regenerating files 1 through 4 

of the release tape. Job MARS2 use EDITLIB to enter file 2 of the release 
tape, or a tape created by deck MARS1, into the running system. Job MARS3 
catalogs the COBOL interface as a permanent file. 

NOTE: The T7000 parameter on the MARS1 job card must be changed to T20000 if 
the deck is to be run on a 6200. 

MARS1,CM1Q5000,T7000,MT02. 001 

RFL(650QQ) 0° 2 

COMMENT. THIS JOB UPDATES AND CREATES THE BINARY OF MARS 003 

NEW PL23 WILL CONSIST OF FOUR FILES 004 

FIRST FILE WILL BE THE MARS NEWPL 005 

SECOND FILE WILL BE THE ABSOLUTE OVERLAYS 006 

THIRD FILE WILL BE MARS COBOL INTERFACE 007 

FOURTH FILE WILL BE THE RELOCATABLE BINARY 008 

LAEEL(FL23Ih,R,LsMARS2Pi»3P4,0=HI) MARS OLDPL 009 

REGUEST(FL23,N,HI> SCRATCH FOR NEW PL23 010 

LABEL<FL23,fc,L=MARS2Pi»3P4,D=HI) Oil 

RENIN0(PL23IN,FL23> 012 

UP0ATE(F,P=PL23IN,NsPL23) 013 

UNL0A0CPL23IN) 014 

RUN(S,,, COMPILE, XX) 015 

RUNCS,, .COMPILE, XX, MARSCOB) 016 

FTMI=C0HPILE,e = MARSC0B,L*XX,0PTs2> 017 

REWINC(MARSCOB) 0*8 

RFLC105000) 019 

LOAO(LGO) 020 

NOGO. 021 

RFL(25000) 022 

REWIND(MARS,PL23,LG03 023 

SKIFF(PL23,i,17) 02<i 

COFYBF(MARS,FL23) 025 

COFYBF(MARSC0E,FL23) 026 

COFYBF(LG0,FL23) 027 

UNLOA0(PL23) 028 

COMMENT. **» END OF JOB *»* 029 
7/8/9 END OF RECORD 

*/ ADD CORRECTIONS HERE 03i 
7/8/9 END OF RECORD 
6/7/8/9 END OF FILE 
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COMMENT. 


THE 


COMMENT. 


THE 


COMMENT. 


THE 


COMMENT. 


ThE 


COMMENT. 


THE 



MARS2,CM55GGQ,T7QQG,MT0i. 001 

COKMENT. THIS JOB EOITLIBS THE MARS V2.1 BINARIES FROM THE 002 

COMMENT. KflRS FL OR THE PL CREATED BY DECK MARS1. 003 

LAEEL(FL23,R,L=fcARS2Pl*3P4,0=HI) MOUNT MARS 2.1 PL QQ4 

REfcINC(FL23) 005 

SKIFF(FL23,1,17) SKIP OLOPL 006 

COFYER(FL23,MAR> MARS MAIN OVERLAY 007 

C0FYEF(FL23,MARS0VL) SECCNOARY CVERLAYS 008 

REkIN0<PL23,MAR,MARS0VL) 009 

UNL0AC(PL23) 010 

EDITLIE(SYSTEM) Oil 

COMMENT. *** END OF JOB *** 012 
7/8/9 END CF RECORD 

REAOY(SYSTEM) 014 

LIERARY<MjCLEUS,OLD) 015 

REFLACE<MARS,K*R»AL=1,FL=6BQG0 ,FLC=1) 016 

FINISH. 017 

LIERARY(SYSCVL,CLD) 018 

REPLACED, MARSCVL) 019 

FINISH. 020 

COMPLETE. 021 

ENCRUN. 022 
7/8/9 END OF RECORD 
6/7/8/9 ENC CF FILE 

MAFS3,CM35GGG,T100,MTCi. 001 

COKMENT. THIS JOB CATALOGS THE COEOL INTERFACE 002 

COMMENT. AS A PERMANENT FILE CALLED MARSCOB. 003 

LAEEL(FL23,R,L=*ARS2P1*3P4,0=HI) MARS PL 004 

REGUEST(MARSCCEj*PF) QQ5 

REWIND (FL23) 006 

SKIPF(FL23,2,17> SKIP OLDPL AND OVERLAYS 007 

COFYEF(FL23, MARSCOB) 008 

REfcIN0(FL23, MARSCOB) 009 

CATALCG(KARSCOE,MARSCCB,ID=MARS,MR=l) 010 

UNL0AC(FL23) Oil 

COMMENT. *»* END OF JOB »** 012 
7/8/9 END CF RECORD 
6/7/8/9 END CF FILE 

The header information should be changed when PSR's are installed to reflect 
the current PSR or PSR summary. 

The following cards can be used for this purpose: 

*I LZ.1 HEACR (1MARS VI V2. 1 PSR 1) 

USER LIBRARIES 

The following paragraphs apply only when MARS is executed from a user library. 

To install MARS as a user library, it is necessary to assemble the name of the 
library into MARS. 

♦DELETE USERLIB.1 

LIBNAME VFD 60/6LMARSVI 
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The default value for LIBNAME is SYSOVL. The EDITLIB directives to create a 
user library are: 

REQUEST (MARSVI , *PF) 

EDITLIB (USER) 

CATALOG (MARSVI, MARSVI., ID=MARS) 

7/8/9 

LI BRARY (MARSVI , NEW) 

REPLACE (*,MARS,AL=1,FL=65000,FLO=1) 

FINISH. 

ENDRUN. 

6/7/8/9 

The above example assumes the overlays to be on a file called MARS. 

If LIBNAME is not changed while MARS is assembled, the MARS command 

USERLIB IS MARSVI; 

can be issued while in MARS. This command has the same effect of assembling 
in the library name. 

EXECUTION FROM USER LIBRARIES 

When batch, is running the following control cards are required 

ATTACH (MARSVI, MARSVI ,ID=MARS,MR= 1) 

LIBRARY (MARSVI) 

MARS. 

For execution under INTERCOM, the following commands should be entered. 

ATTACH (MARSVI, MARSVI, ID=MARS,MR=1) 
XEQ, LIB LOAD=MARSVI, MARS, EXECUTE 

VERIFICATION PROGRAM 

Day file output from running the verification program should be similar to the 
following. The COBOL Interface must be available as a permanent file for the 
verification program to run. 



1-27-4 60307400 A 



MARS VI V2.1 

$ * 

i THE FIELD LENGTH REQUIRED FOR THE MODULES ARE ? 

* 

$ LOADER 6300Q OCTAL ; 

S RETRIEVAL 56QGC OCTAL ? 

$ UPDATE 65000 OCTAL ; 

$ ? 

DEFINE! 

NEW DATA EASE AIRFIELC? 

1) IC NLMBERdNTEGER NUMBER): 
HAF? 
DEFINE SIBITEt'S: 

recofc ic is afield; 

COL 1-10, CI, IDENTIFICATION N UMBER . NUM , KEY ? 

COL 11-37, KAME,AIRFIRLO NAME. ALPHA? 

COL 38, CCDE , ENTRY CODE? 

COL 39-53, COCRCS,GEOGFAPHIC COORDINATES? 

COL 3°-£*0,DEGLAT, DEGREES LAT AT ITIDE .NUM J 

COL 45, NSOIRECT, NORTH OR SOUTH DIRECTION. ALPHA ? 

COL E3,EW0IRCT,EAST OR WEST CI RECT ION. ALPHA ? 

COL 57, CFSTATLS, OPERATIONAL STATUS CODE? 

COL 59-63, ELEV, ELEVATION. INTEGER? 

COL 68, MAINCOCfc, MAINTENANCE FACILITIES CODE? 

COL 72, LIGHT, LIGHTING CODE* 

COL 86,RLNCCNC,FUNWAY CONDITION? 

COL 96-115/2, RGi: 

COL 1-3, RG2. ALPHA? 

COL ^-8, RG 3. ALPHA? 

COL 9-10, RG^. ALPHA? 

r-ki r* rs r a • 

COL 99-103, SNWYELEV, RUNWAY ENDDELE VATION.NUM? 

COL 106-108, PENDIO, HIGH RUNWAY IDENTIFICATION . NUM? 

COL 114-115, ROVcRUN, RUNWAY OVERRUN2? 

COL 118-120 ,RUNCBS, RUNWAY OBSTRUCTION? 

COL 126-129, MAGVAR, MAGNETIC VARIATION? 

COL 130»RECMARK, RECORD HARK? 

ENC DEFINITION? 

LOADER? 

DATA FILE IS TEST,CP? 

or- r <•> n n rn c T c ti-ota. 

itl. i. i; n; u <"j.i_c ic icoih, 

SCAN AFIELC? 

NUMBER OF RECCSCS EXAMINED WAS 20 

NUMBER OF PECCRDS ACCfPTED WAS 20 

NUMBER OF RECCRCS STAFRED WAS 

NUMBER CF FECORCS ON FECORD FILE IS 2u 

AIRFIELD DEFINITION VERSION 1 DATA VERSION 

UNLOAD TEST! 

* ; 

DEFINE MACRC MYMACRO? 
EXPAND ON? 

$ : 

S T^IS IS A MACRO EXPANDING ? 

£ * 

ATTACH: AFIELC? ID=CrC?CY=-C; FINIS? GETPF TE STA ,TESTAPFN ? 

RETRIEVAL? 

EXPAND OFF? 

ENC MACRC? 

DEFINE MACRC REPORT!? 
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message file is null! 

retrieval; 

if ccl(38> ec *p<01> and (elev-3)/lq 

COCE,£K=Cl**P(0^),BY LOW PK ? 

reporter; 

format; 

title is a 1 r f i e 



EQ *P<02) QUALIFY CI ,KK=*P( Q 3 ) , 



L PEP 
TITLE IS THE PARAMETERS USED IN 
ANG *F<C<*> ? 

HEADING IS Cl,KK,COO£,BK? 
DETAIL IS Cl,KK,CODE,PK? 
FOCT IS END OF FAGE? 
SPACE TO 16 IN Tl BEFORE II? 

1 5 , it 7 , ^ 3 

15,47,5 3 

18 IN Fl 



o R 

THE 



t; 
retrieval 



ARE *P(G1),*P(32) ,*P(Q3> 



IN HI, HI, HI 
IN D1,D1,D1 
BEFORE It; 



SPACE TO 
SPACE TO 
SPACE TO 

generate; 

retrieval; 

message file is output? 

END macro; 

$ ? 

retrieval; 

print c1,ccce,magvar where cl 

CI =000 05001 50 

COCE=N 

MAGVAF=012E 



8EFCRE 12,13,14? 
BEFCRE 12,13,14; 



GT 0000500140 AND Cl LT 0000500210? 



C1.= OC0 05C316 
COCE = N 
MAGVAR=015E 

C1=0C0CSG0170 

COCE=N 

MAGVAR=018E 

C1=0CQ050018C 
COCE = N 
MAGVAR=02GE 

C1=GC3G50C190 

COCE=N 

MAGVAR=024E 

Cl=GCG05002CG 
COCE = N 

magvaf=0c0e 

end cf retrieval 

if cl range(oogg500140,0000?ou21c) mass update? 
coce=e; 

READY 

MAGVAR = AECC? 
READY 

finis; 

update complete, enter command 

retrieval? 

PRINT Cl,COCE,f AGVAP VHE»E Cl EO 0000500170? 
Cl = 00 05 CO 170 
COCE = E 
MAGVfl5 = AECC 
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ENC CF RETRIEVAL - — 

PRINT Cl,NAfE,CFSTATUS WHERE CI EC RANGE [S0019 0/500260 ] ? 
Ci= 00 05 00 190 



NAKE=GRAND HAVEN MEM 
OPSTATLS=A 



Zk 



Ci=OGGCEOC200 

NAME = GRANQ HAVEN MEM 

OPSTATUS=A 



Cl=0000500210 
NANE=GfiAND HAVEN MEM 
OPSTATLS=A 



2fa 



C1 = GOGG500?2£S 

NAPE = GRAND HAVEN MEM 

OPSTATUS=A 



27 



CI =000 05 00220 
NA^E=GPAND HAVEN MEM 
OPSTATLS=A 



2 8 



Ci=OCOC500240 
NAHE=GRANO HAVEN MEM 
OPS7ATUS=A 



29 



Cl = 000G5G02i>G 
NA*E=GRANO HAVEN MEM 
OPSTATLS=A 



30 



C1=QOOG50026G 
NAME=GRAND HAVEN MEM 
OPSTATUS=A 



31 



END CF RETRIEVAL 

IF (RGMANY) EG N) AND (CI LT OG00500160) PRINT C1,RG2 ( EACH ) ; 
Ci=G0GG5G01G0 
RG2( 1) = Q90 
RG2C 2) = 27 

C1=0GCC?0Q11G 
RG2( 1) = 09 
RG2C 2) = 270 

Ci=00C05fl0120 
RG2( 1) = G90 
RG2C 2) = 27 

Cl=00CG5G013C 
RG2C l) = 09O 
RG2( 2)=27C 

C1=OC005001^0 
RG2( 1) = C90 
RG2( 2) = 27 

C1=OOG05G0150 
RG2( 1> = C90 
RG2( 2)- 27 

END CF RETRIEVAL 

IF Cl*50 GT 50G250 REPORT Cl , NAME , CODE, IX=C1/100 ' 
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CI 



NAME 



ccde 



IX 



00 C0£rG0210 


GRAND 


HAVEN 


'MEM 


00 GQECG22G 


GRAND 


HAVEN 


Mt M 


00 CQ5CG2 20 


GRAND 


HAVEN 


MEM 


00 G05G C2A0 


GRAND 


HAVEN 


MEM 


30 CQ5CC250 


GRAND 


HAVEN 


MEM 


G0GQEGC2E0 


GRAND 


HAVEN 


MEM 


OOG05G0270 


GRAND 


HAVEN 


MEM 


QGCQ5GC28G 


GRAND 


HAVEN 


MEM 


JOC050&290 


GRAND 


HAVEN 


MEM 



26 


N 


27 


N 


28 


N 


29 


N 


30 


N 


31 


N 


32 


N 


33 


N 


3<* 


N 



5002 
5002 
5002 
5002 
5002 
5002 
5002 
5002 
5002 



ENC CF RETRIEVAL 

PRINT RECCRC(DETAIL) WHERE Ci EQ 5C0170 

C1=OC005C017C 

NAME = GfcAND HAVEN MEM 22 

CCDE=E 

COCRCS = *»30 2 0e-NG86i2G0W 

DEGLAT=V3 

NSCIPECT=N 

EWCIRCT=h 

OPSTA7US = A 

ELEV=GG603 

MAINCCCE=C 

LIGHT=7 

RUNCCNC = G 

RG2(i)=090 

RG3(1)=U 

RG«*(1)=N 

RG2(2>=270 

RG3(2)=U 

RGM2)=N 

RNfcYELEV=U 

RENOIC = 270 

ROVEPUN=N 

RUNOBS=270 

HAGVAR=A6CD 

RECMARK=] 

— - END OF RETRIEVAL 

catalcg: 

PFN = 

afield; 

id=cdc; 
cy=uo; 
permanent file function complete 

fims: 
saveff testa, testapfn? 
permanent file function comflete 

EXIT? 
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AO C016 



UC0C1 
000G2 
CCuC3 
U C u *♦ 
Q ■:■ 
GCCOe 
D ^ G 07 
Ci G 8 
GCGC9 
G G 1 C 

o e o i i 

(' 1 2 
GC013 
u C u i ^ 

Q U C 11: 
OUGlt 
00C17 
018 
GQCi c 
00 j2C 
0Gi21 
0GG22 
C u 2 3 

yii?-i 

C u 2 ■- 
C 02t 
0C027 
0C02H 
GC029 
G G 3 t. 
GCQ31 
G G 3 2 



ID EN 
f R OG 
EM VI 
T IMF 

I n FU 

FILL 

DATA 
FJLE 
FC 



n 



WORK 
7 ir" 
7 7 
7 7 
7 7 
CI 



JLES 



02 



ATION DIVISION. 

0. LP25>. 

NT DIVISION. 

TION SECTION 

PUT SECTION. 

ROL. 

T FILE-1 ASSIGN TO OUTPUT. 

SIOM. 

ION. 

1 

RE( 
RECOI 



ORGS ARE OMITTED 
RD IS REC-1. 



-CI PICTURE X (10). 

-NAME PICTUF-l X(27) . 

-CODE PICTURE X(l) . 

-C9 PICTURE X (10) . 

TCRAGE SECTION. 

VALUE *NAME? FICTURE X ( *+ > . 

VALUE tCODZt FICTUPE X(i»). 
LUE *C1* PICTURE X(2). 
LUE *C9999* PICTURE X(5) . 

* 

1VALUE VALUE *CU0050&2ZO* FICTURE X(10) 

2VALUE VALUE * u 00 ? G2 1 * PICTURE: X(10) 

ECC USAGE IS COMP-1 PICTURE 9(10). 

FLG USAGE IS COMP-i PICTURE 9(10). 

EWCODE P iCTLRE X(l) . 

TUF. 

ATA8ASE VALLE *AFI£LO# PICTURE X(&). 

BP VALUE *IC=CDC:* PICTURE X(7). 

£F VALUE *TESTA* PICTURE X(3). 
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LF2< 



AG 016 



ju033 ^CCEGURE DIVISION. 

U G 03i* START. 

0oC3'..: CFEN OUTPUT FILE-1. 

CC036 ENTER HARSOPN USING DATABASE, DFP. 

00037 ENTER MARSDEF USING REF, NAME, C-NAME , COCES, O-COOE , CI, 

38 O-Cl, C9, 0-C9. 

GCC35 ENTER MARSGET USING REF, .Cl , C1VALUE, RECC, ERFLG, ERPAPA. 

QCG4G WRITE REG-1. 

GCO^l MOVE tit TO C-COCE . 

0^2 ENTER MARSTOR USING REF. 

0G0h3 ENTER NARSPEP. 

GGQ^ ENTER MARSGET USING REF, Cl , C2VALUE, RECC, ERFLG, ERPARA. 

tf E WRITE REC-1. 

G *♦ e ENTER MARSGET USING REF, Cl, C1VALUE, RECC, ERFLG, ER*AR4. 

0GGh7 WRITE REC-1. 

C- J i* 8 ENTER MARSCLO. 

Ciufi^ CLOSE FILE-1. 

GCG5G STOP RUN. 

051 fRFARA. 

CE2 DISPLAY *FAIL*. 

C G t 3 ST OF RUN. 

LP25 LFNGTH IS C0021K 

FIELD LENGTH NEEDED FC'R COf : OL 0*21-00 



jC'Ctf'J22GGPAND HAVEN f-EM 
■10 CECGZ10GFANC ^AVEN NEM 
00 0E0G22uGRH:C ^•AVE^ , MEM 



27N 


13 


2bN 


12 


27 2 


13 
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MARS VI V2. 1 Li^/0i/7? 

* T'rIS IS A MACRO FXFSMCIhG 

attach; 

PFN = 

AFIFLO: 

ID=CCC? 

cv =**o: 

permanent file functicn complete 

finis; 

gt'tff testa, testapfn! 

permanent file! functicn complete 

retrieval? 

ex fa no off! 

retrieval; 

REFQP7 FILE IS Xt 

IF Ci LT OCCCvOSOC SUBSET C 1, NA ME , CODE , LL=EL c V- 3 ? 

END CF RETRIEVAL 

SUESFT COPLETE- 10 PEfOPOS- 6 WORDS EACH- 9 CHARS OF FILL 

REFCFT FILE IS OUTPUT? 

RE UNO x; 

TRANS FILE IS L.F ,CPt 

MASS UFCATE BY CIS 

DEFINITION i 

DATA PASE? 

ENOEF ! 
INVALID TRANSACTION RfCORO, KEY VALUE MOT IN FILE SPECIFIED OF FILE INACTIVE 
RTESTA uGCCvLu.iSQST, LOUIS MISSOURI USA S 



a t dc f iiv in c r i ~ o nr OTTTrn 
i j. i_ _ o r r_ sj i r j. <_ u 



1 1_ r i_ i" u i 

ITEST5 GOEGSOuEQOST. LOUIS MISSOURI USA 

p 

INVALID TRANSACTION RfCORC, FILL NAME NOT RECOGNIZED 

SXXXX*D U0Gu5CC?50ST. LOUIS MISSOURI USA 

INVALIC TRANSACTION RECORD, FILE NAME NOT RECOGNIZED 
PX FIELD GC3G'.-n f :-27C 



INVALID TRANSACTION RFCCRD, Kt V VALUE NOT IN FILE SPECIFIED OR FILE INACTIVE 

PT CCTA r> rs z, ., o i a ;! CT i riirc mtcct, i.gt hca c 



. _> J •.-■ «.' l\ J. 



10 transact i cns processed 
update ccmflete, enter command 
retrieval; 
print ci ,nane,cfstatus whefe cl gt 300j r; 0019c and cl lt 05 00260? 

Ci = C G 1; 2 1 G 

NAKE=GPANC RAVEN MEM 2€ 

OPSTATUS = A 

C1=0CGCEGG22 

NANE=GRAND HAVtN MEM 27 

OPSTATLS=A 



C1=C0CCEG023G 

NAfE = GRAND HA YEN MEM 

0°STATLS=A 



??. 
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Cl=0CCU5QG2^u 
NAhE=GFANO HAvi 
0PSTMIS = A 



MEM 



Cl=OCCC c 0G?~0 

NAME = GRAf^D HAVEN M F M 

OPSTATLS=A 



3C 



FKC CF RETRIEVAL 

PRINT RG2(i),EG3(2) WHERE SAME! ? 

RG?<1)=G<=0 

RG?(2) =U 

RG ? ( 1 ) = C c 
RG3<2)=U 

RG2(i)=U9G 
RG2(2)=L 

RG 2 ( 1 ) = t 9 C 
RG3(2>=U 

RG2(1)=C90 
RG3(2) =U 

END CF RETRIEVAL --- 

TRANS FILE IS INPUT! 
MASS LFDflTE EY CI? 

nogef; 

READY 

Cl=O0GOSQ0i;0,CCOE=7! 

READY 

Ci=3CCP5 00 20 0,CODE=7; 

KEY VALUE DCE5 NCT EXIST UP FILt INACTIVE 

READY 

Cl=GCDOi00 2 E ;n,r.LEV = DEGLAT + lt J 

READY 

fims: 

update ccmfletg, enter command 

retrieval; 

PRINT CI ,CCEE,f"AGV£P ^HERL f ■ 1 EQ 0000500150 CI Ci EQ C u03 C2 00 : 
Cl = 000OLiC01'j0 
COCE=Z 
MAC-VAR = AECC 



fNC CF RETRIEVAL 

♦PEPC*T1,N, >:0,CCL(il TO 3" 



) ,2* 



THE PARAPET* 


?;rs usee 


IN TH! 


: . F'E' 


Ci 


KK 






00 C OeC 02-50 


Cr AND 


HAVEN 


-MEM 


3C CG5GG280 


C-^AND 


HAVEN 


MEM 


QC C0EGG27D 


GRAND 


HAVFN 


ME M 


00 005u02fcQ 


G*AND 


HAVEN 


MtM 


30 00E0C240 


GRAND 


HAVFN 


Mf m 


00CGE 00230 


GPAND 


H£VEN 


Mt M 


GO GOE 00210 


GRAND 


H A V E N 


MEM 


30 COED 014 


C-PAND 


HAVEN 


Mt M 


JOC0SQU130 


G^ : AND 


HfiVEN 


MtM 


00 G050C1G0 


GRAND 


HAVEN 


Mr M 
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AIRFIELD FEFORT 
RETRIEVAL ARE N 



34 
33 
32 
31 
29 
28 
26 
19 
18 
15 



EN- 


COL (11 TO 37) 


CODE 


BK 


N 


10 58 0.00 


K 


1000^60.00 


K 


10 540.00 


N 


10 320.00 


N 


1000 480. 00 


h 


1000460.00 


N 


1003420.00 


N 


1000280.00 


N 


10 26 G. 00 


N 


1003200.00 



AND 2 
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IF SANE COUNT RECORD? 
COL-NT = 1C 

END CF RETRIEVAL 

DESCRIEE MACRO SKELETONS: 

MACRO NAPE = HYMACPO 
EXPAND on; 



THIS IS A MACRO EXPANDING 



attach! afielc: i d=ccc ? cy=- 0? finis? getpf tf. sta ,testapfn? 
retrieval: 
expand off? 
end macro: 



MA C R C 

ME S S A G 

RE TRIE 

IF C 

CODE,E 

REFOPT 

FORMAT 

TITLF 

TITLE 

AND tf 

HEADIN 

OE TAIL 

FOOT I 

SPACE 

SPACE 

r-Q /i r*r 
or HOC 

SPACE 
GENERA 
RETRIE 
MESSAG 
END MA 
END OS 
PURGE ? 
PFN = 
AFIELC 
CY =4 * 
PERMAN 

exit; 



NANE = REPORTl 
E FILE IS NULL? 
VAL? 

cl(38) eg #p(01> s and <elev-3>/10 eq *p<02) qualify c 1 ,kk=*p ( 3 ) , 

k=c1*#f(0m ,ey low bk : 

er; 

is airfield report? 

is the parameters use d in the retrieval are tp{ 1 ) , tp ( 2) ,#p ( 3) , 

ecu : 

6 is ci,kk,code,bk; 

IS Ci,KK,CODE f FKt' 
S ENC OF C AGE? 
TO 16 IN Tl BEFORE lit 

TO !S,itV,i, 3 IN HI, HI, Hi R t FORE 12,13,1**: 
TO IE, <*7»: "3 IN Li, Oi, 01 BEFORE 12,13,1*+ 5 
TO 18 IN Fl BEFORE II? 

te; 

val; 

e file is output: 

crc; 

scrifticn 



FNT FILE FUNCTION CCMPLET! 



21 .Oe.Sl.Vf-'ARSlC 

2i.G8.5l.VKARS,CM6 5G00,T2bC. 

21 . Q8.51.CCFYeRQNPUT,UP,l> 

21 .08. 52.CCFYEM INPUT, TEST, 1) 

21 . 8 . 52 . R E K I NO ( UP , TE S T , AOPL OA D ) 

21 .C8.E3.CCFYSEF (UP, OUTPUT) 

21 .08.5*) .CCFYSGF (TEST, OUTPUT > 

21 .08.E^.RE^INC(ADDLOAD,TE;ST ,Uf) 

21 . 08.55 .RE CUE ST (TEST A,* PF) 

21 .08.tE.NARS(FF) 

21.n8.t7. 2.185 RT SECONDS LOAD TIME 

21 .08.i 7 .RECUFST (TAFEC,*,FF) 

21 .08. 57. RE GUEST (TAPE 12, *,FF> 

21 .08. 57. RE GUEST (TAPE 3 1,*,FF) 

21 .08.? 7. RE GUEST (TAPE 10, *,FF) 



60307400 A 



1-27-13 



21 .0 
21 .0 
21 .0 
21 .0 
21 .0 
21 .0 
21 . G 
21 .0 
21 .0 
21 .0 
21 .0 
21 .0 
21 .U 
21 .0 
21 .0 
21.0 
21 .0 
21 .0 
21.0 
21 .0 
21. Q 
21 .G 
21.0 
21 .0 
21 .0 
21 .0 
21 .0 
21 .1 
21 .1 
21.1 



21 
21 
21 
21 
21 
21 
21 
21 



21 .1 
21 .1 
21.1 
21 .1 
21 .1 
21.1 
21.1 
21 .1 
21 .1 
21 .1 
21 .1 
21 .1 
21 .1 
21 .1 
21 .1 
21 .1 
21 .1 
21.1 
21.1 
21 .1 
21 .1 



e.5 8 

8.58 
8.58 

e.58 

8.E9 
8.59 
8.E9 
8.59 
8.59 
8.59 
8.59 
8.59 
9. Oh 
9.C5 
9.05 
9.G6 
9.C9 
9.09 
9.09 
9.59 
9.59 
9.59 
9 .59 
9.59 
9.59 
9. 59 
9.59 

c.ce 

0.07 
0.C7 
C.G^ 
C.G7 
C.C7 
0.10 
C.ll 
0.17 
C.17 
0.18 
C.18 
€.18 
C.18 

o • 3n 

C.37 

C.38 
G.38 
C.tl 

1.C1 
1.01 
1.C2 
1.05 
1.06 

i.ee 

1.08 
1.08 
1.08 
1.G9 
1.C9 
1.C9 
1.C9 



.REQUEST 
.RECUEST 
.REQUEST 
.RECUEST 
. { TAFtG 
TAPEe 
T A F E 1 
TAPE8 
TAFE9 
TAFE1 
TAFE1 
TAFE1 
TESTA 



(TAFE 

(TAPE 
(TAPE 
(TAPE 

AS 
AS 
AS 
AS 
AS 

AS 

1 AS 

2 AS 
AS 



9,*,PF) 

e,*,FF) 

7,*,PF) 
e ,*,FF) 

SIGNED TO 
SIGNED TO 
SIGNED TO 
SIGNED TO 
SIGNED TO 
SIGNED TO 
SIGNED TO 
SIGNED TO 
SIGNED TO 



.SRTMRG 



.SFTMRG 



Hi RECORDS SO 
1 INTERNAL M 



EST 10 ) 

EST 10 ) 

EST 10 ) 

EST 10 > 

EST 10 ) 

EST 10 ) 

EST 1C ) 

EST 10 ) 

EST 10 ) 

RTED 

ERGE PHASES 



.INDEX E 
.INDEX e 
.INCEX E 
.INDEX P 
.INDEX B 
.INDEX r 
.INDEX E 
.INDEX P 
.RETURN* 
.ATTACH( 
.FF CVGL 
.ATTACM 
.PF CVCL 
.CCECKL 

1. 

.CCfFILI 
• CODE 
. FIELD 
. * 
•END CCE 
.LCAO(NA 
.LGC. 

12. 
.RETURN ( 
.ATTACM 
.MARS (M = 
2. 
. S R T N R G 



.SRTHRG 



.INUE X 
.INDEX 
.INDEX 
.INDEX 
.INDEX 
.INDEX 
.INDEX 



Hi R 
1 I 
UFFER 
UFFER 
UFFER 
UFFER 
UFFER 
UFFER 
UFFER 
UFFER 
TESTA 
MARSC 
E NO. 
TESTA 
E NO. 
) 

85 7 R 
NG LP 
AND 
LENGT 
Hl5 C 
OL 
RSCOB 



F CORDS SO 

NTERNAL M 

NOT SPEC 



NOT 
NOT 
NOT 
NOT 
NOT 
NOT 
NOT 



SPED 
SPEC 
SPED 
SPEC 
SPEC 
SFEC 
SPEC 



RTED 

ERGE PH 

IFIEC I 

IFIED 

IFIED 

IFIED 

IFIED 

IFIED 

IFIED 

IFIED 



ASES 
N FET 
N FET 
N FET 
N FET 
N FET 
N FET 
N FET 
N FET 



) 

CB,MAPSCO 

= 0C1 
,TESTAf FN 

= OhO 

T SECONDS 
?5 

T/U Q 
H NEEOfc 
F SECONDS 

) 



496 RT SECONDS 
TESTA) 

TAPE6,AFIELD2, 
MYMACPO) 

26 C RT SECONDS 

3 RECORDS SO 
1 INTERNAL M 

3 RECORDS SO 
1 INTERNAL M 

UFFER NOT SPEC 

UFFER NOT 

UFFER NOT 

UFFER NOT 

UFFER NOT 

UFFER NOT 

UFFER NOT 



8,ID=MARS,MR=1) 
,IC=COC) 

LOAD TIME 

IAGNCSTICS ISSUED 
FOR COBOL 05250G 
COMPILATION TIME 

LOAD TIME 

IO=CDC,CY=40) 

LCAC TIME 

RTED 

ERGE PHASES 

RTED 

ERGE PHASES 
IFIED IN FET 
IFIED IN FET 



S ■•"' E. [ 
SPEC 
SPEC 
SPED 
SFEC 
SPECIFIED IN FET 



IFIEC IN FET 
IFIEC IN FET 
IFIcD IN FET 
IFIED IN FET 
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21.11.58.INCEX BUFFER NOT SPECIFIED IN FET 

21 .11,58. REWING(TESTA) 

21 .ll.£8.CGFYS6F(TESTA,OUTPUT) 

2i.ll.f9.KEWlKC(X) 

21 . 11. tg.CCFYSEFCX, OUTPUT) 

21 .12.G0.FURGECTESTA) 

21.i2.G0.CFA 10.173 SEC. 

21. 12. 00. PF 166.305' SEC. 
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241 INTERACTIVE GRAPHICS SYSTEM (IGS) VERSION 2.1 28 



RELEASE DESCRIPTION 

6000/241/IGS Version 2.1 runs under INTERCOM 4.1 in conjunction with SCOPE 3*4 
to provide a remote interactive graphics capability in IGS mode as well as the 
capability to converse with INTERCOM in COMMAND mode. 

The 6000/241/IGS package allows the user to write a central memory application 
in FORTRAN Extended and interact with that program at the console through the 
keyboard, function keys, or lightpen. The IGS routines are callable only 
under FORTRAN Extended. The user, in COMMAND mode, has all the normal INTERCOM 
commands and capabilities available to a CRT terminal user under INTERCOM 
4.1. 

The installation of 6000/241/IGS Version 2.1 requires the previous 
installation of INTERCOM 4.1 and those products required by INTERCOM 4.1 under 
SCOPE 3.4. 

6000/241/IGS Version 2.1 will be made available under SCOPE 3.3 at a later 



HARDWARE CONFIGURATION 

In addition to the minimum hardware required by SCOPE 3.4 and INTERCOM 4.1, 
6000/241/IGS requires the following equipment for communication and 
operations: 

1. A 241-1 Graphics Subsystem with a 248-2 Memory Expansion for each 
terminal* 

2. The communication between the remote terminal and the central site 
requires a 201A or 201B Data Set or a 358-2 Transceiver. This 
communication equipment must be connected to the 6671 multiplexer as 
required for INTERCOM 4.1. 

Hardware Options 

No other hardware options are supported by this software. 
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RELEASE MATERIALS 

6000/241/IGS Version 2.1 release material consists of 2 magnetic tapes which 
contain the 6000/241/IGS 2.1 OLDPLs in UPDATE format. 

PL24 Central Memory Routines 
PL25 Remote Routines 

PL24 consists of the following files: 

OLDPL File 

File 1: 6000/241/IGS Version 2.1 CM OLDPL in UPDATE format. 

(This contains the central memory routines required for IGS 
operation. ) 

Binary File 

File 2: Central memory routines. This file is part of the LIBRARY 
IGS 241. 



Installation Decks 

File 3: CMFINST 
File 4: CMFMANT 



Performs new installation of central memory routines. 

Updates OLDPL (File 1) and performs system EDITLIB 
functions. 



File 5: CMFBIN 

File 6: J0B3 
PL25 consists of the following files: 
OLDPL File 



Installs from Binary File 2 
Verification deck 



File 1: 6000/241/IGS Version 2.1 RM OLDPL in UPDATE format. 

(This contains the remote terminal resident software and 
utilities to assemble and format the code.) 



Binary Files 

File 2: BNG 

File 3 : BNB 

File Hz GIN 

File 5: GFINT 



GRASS Assembler! 



Part of LIBRARY IGS241 



BINTAP routine 

Central memory transfer routine for GFINT 

Grid resident routine 
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Installation Decks 

File 6: RMFINST Performs new installation of RM routines 

File 7: RMFMANT Updates OLDPL (File 1) and performs system EDITLIB 

functions 

File 8: RMFBIN Install from Binary Files (2-5) 

NEW FEATURES 

1. 6000/241/IGS Version 2.1 runs under INTERCOM 4.1 with no modifications 
made to SCOPE 3.4 or INTERCOM 4.1 routines. 

2. The GRIDRES routine has been rewritten to conform to the changes in the 
central memory Q8GEXEC routine. The internal table structure in GRIDRES 
has also been changed to reduce the amount of storage required for 
processing and the time required to process the graphics data. 

3. GUPNTS routine has been added which provides point plot capability. 

4. The GUARC and GULINE routines have been added. These routines provide line 
and arc scissoring capabilities in the central processor. 

5. A new error processing feature has been added which will display error 
messages at the remote terminal as they are generated. To continue, the 
user is required to pick the error message with the light pen. 

LIMITATIONS 

1. All limitations as they exist for INTERCOM 4.1 apply to 6000/241/IGS 
Version 2. 1 when operating in COMMAND mode 3 

2. IGS application programs must use FORTRAN Extended to call the IGS 
subroutines. 

3. The 6000/241/IGS Version 2.1 communication with INTERCOM assumes the place 
of a 217-13 or 217-14 CRT remote terminal, (an ANSI terminal) . Please 
note the restriction in INTERCOM 4.1 concerning the prohibition of mixing 
BCD and ANSI 200 User Terminals. 

4. The simultaneous use of interactive graphics data and non- IGS data at a 
remote terminal is not allowed. During IGS mode, INPUT and OUTPUT files 
in the central memory program should be disconnected to eliminate the 
possibility of mixing IGS and non-IGS data. 
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GENERAL PROCEDURES 

The installation of the complete 6000/24 1/IGS system requires installing from 
the 6000/241/IGS program libraries. The jobs required to install the system 
are released as installation decks. The installation of INTERCOM 4.1 is 
required before attempting to use 6000/241/IGS Version 2. 1 but not necessary 
for the proper installation of IGS. 

Central Memory Requirements 

The standard installation of 6000/241/IGS Version 2.1 does not require any CMR 
space beyond that required by INTERCOM 4.1 for multiplexer tables and buffers. 

Installation Parameters 

See INTERCOM 4.1 installation instructions. 

Port Definition Entry 

For each 6671 multiplexer port which is to service a 241 GRID terminal, a port 
definition entry macro-CRTA must be used in the CMR MULTIPLEXER SUBTABLE. 

Pa ssword 

A password entry is required to initialize the 241 memory using the Deadstart 
Initialization Procedure: 

ADD U=G41 ,P=G41 ,F=60000,T=777 

INSTALLATION PROCEDURES 

The 6000/241/IGS Version 2.1 system is to be installed under SCOPE 3.4. The 

following set of jobs will produce a new system with IGS installed. The jobs 

are included with the release program libraries. (See files 3, 4, 5, 6 of 
PL24 and 6, 7, 8 of PL25 under Release Materials.) 

To create a deadstart tape from the running system, modify job SCOPE 3 from the 
SCOPE 3.4 PL by inserting this card in front of card 22 (the COMPLETE card): 
INCLUDE (IGS2 41, SYSTEM, DS ) . A similar card must be inserted in front of card 
038 of deck SCOPE2 (see section 1, MODEL JOBS). 

Deck RMFMANT contains two PURGE cards which must be removed if no previous 
level of RMFMANT exists in the system. 

Files that contain the necessary installation decks may be obtained by running 
a job of the type: 

jobcard jobcard 

REQUEST ,PL2 4, E. REQUEST, PL25,E. 

SKIPF(PL24,2,17) or SKTPF (PL25,5,17) 
COPYBF(PL24,PUNCH,3) COPYBF (PL25,PUNCH,3) 

UNLOAD, PL2 4. UNLOAD, PL25. 

6/7/8/9 6/7/8/9 
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THIS JOB WILL REQUIRE PL24 AS INPUT AND WILL 
EDITLIB -IGS241- INTO SYSTEM. 

PL24 FOLLOWS 

FILE1 — UPDATED OLDPL OF CENTRAL MEMORY 
ROUTINES WITH MODIFICATIONS. 



I6S 



FILE2 — 



RELOCATABLE OBJECT CODE FOR 241 IGS 
CENTRAL MEMORY ROUTINES. 



FILE3 — A COPY OF THIS DECK. 

FILE4 — A COPY OF THE MAINTENANCE DECK. 



FILES — 



A COPY OF A PECK TO INSTALL FROM THE 
BINARIES ON THIS TAPE OR THE BINARIES 
ON A MAINTENANCE TAPE. 



F1LE6 — A COPY OF THE VERIFICATION PROGRAM. 



CMFINST,CM60000»T2000«MT2. 

COMMENT. THIS DECK MAY BE USED TO INSTALL 241 IGS VERSION 2.1 

COMMENT, CENTRAL MEMORY ROUTINES 

COMMENT. 

COMMENT. 

COMMENT. 

COMMENT, 

COMMENT. 

COMMENT. 

COMMENT , 

COMMENT. 

COMMENT, 

COMMENT. 

COMMENT, 

COMMENT, 

COMMENT, 

COMMENT. 

COMMENT. 

COMMENT, 
COMMENT. 
COMMENT, 
COMMENT. 
COMMENT. 

POMEHU 
COMMENT* 

fcABEL (PL24 f R»L*241GWF2P**3P4»D«HI ) 

c6PYBFtPL24tCMO) 

C0PVBF(PL24»NIL»4) 

COP YBF l PL24 » PUNCH ) 

REWIND tCMO) 

UNtiOADfNIL) 

UNL0AQ(PL24) 

COMMENT, THIS UPDATE MAKES NEWPL WITH 

UPDATE <P=GMG»F*C«CMN) 

UNLOAD (CMO) 

f TN < I *CMN* B*BN 1 ♦S-PFMTEXT VS»CP€f EXT 1 0PT« 1 ) 

COMMENT. MAKES LIBRARY OF ABOVE ROUTINES 

iPffLIBlSYSTEM) 

7/8/9 

^MODIFICATIONS TO CENTR1L MEMORY ROUTINES SHOULD FOLLOW THIS CARD. 
#/ 

7/0/9 

RfWIND(gNl) 

READY i SYSTEM* OLD) 

LIBRARY UGS24W0LD) 

ADD(*fBNl) 

FINISH. 

COMPLETE. 

EN0RUN. 

6/7/8/9 



INSTALLATION MODIFICATIONS • 



IGS241, 



001 
002 
003 
004 
005 
006 
007 
008 
009 
010 

oil 

012 

013 

014 

015 

016 

017 

018 

019 

020 

021 

022 

023 

024 

025 

026 

027 

02* 

029 

030 

031 

03? 

033 

034 

035 

036 

037 

038 

039 

040 

041 

042 

043 

044 

045 

046 
047 
048 
04* 
030 
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THIS JOB WILL REQUIRE PL25 AS INPUT AND WILL 
ADO TO LIBRARY (I6S241) IN THE SYSTEM. 

PL25 FOLLOWS 

FILE1 — UPDATED OLDPL OF GRIDRES AND UTILITIES 
WITH MODIFICATIONS. 

FILE2 — RELOCATABLE OBJECT CODE FOR 
GRASS ASSEMBLER. 



FILE3 •—• 



RELOCATABLE OBJECT CODE FOR 
BINTAP ROUTINE. 



FILC4 — RELOCATABLE OBJECT CODE FOR 
GINIT ROUTINE. 



FILES — 



RELOCATABLE OBJECT CODE FOR 

GRID RESIDENT FORMATED BY BINTAP. 



FILE6 — A COPY OF THIS DECK. 



RMFINST,CM60000,T2000»MT2. 

COMMENT. THIS DECK MAY BE USED TO INSTALL 241IGS VERSION 2.1 

COMMENT , REMOTE ROUTINES. 

COMMENT. 

COMMENT. 

COMMENT. 

COMMENT. 

COMMENT. 

COMMENT. 

COMMENT. 

COMMENT , 

COMMENT. 
COMMENT. 
COMMENT, 
COMMENT. 
COMMENT. 
COMMENT. 
COMMENT. 

COMMENT, 
COMMENT. 
COMMENT. 

CQNMjENT. 

COMMENT. 

COMMENT. 

COMMENT. 

COMMENT , 

COMMENT. 

COMMENT , 

COMMENT. 

COMMENT. 

COMMENT, 

COMMENT . 

LABEL tPLe5#R*L«2ft!«MF2Pt*3P4*D-HI ) 

C0P¥BF(PL25*CM0) 

REWINDfCMO) 

UNLOAD<PL2§) 

COMMENT. THIS UPDATE MAKES NEWPL WITH 

UPOATE <P*CMO»F*N«CMN> 

WiLOAOtCMOJ 

COMMENT. THIS UPDATE PUTS THE GRASS ASSEMBLER SOURCE ON A FILE NAMED 

COMMENT, GRAS FOR INPUT TO THE RUN COMPILER. 

#p£^4P*CMN*0*C*GRAS) 

iPOMMfNT, THJS UPDATE PUTS THE GRID RESfOENT SOURCE ON A FILE NAMED 

COMMgNT, ORES FOR INPUT TO THE GRASS ASSEMBLER. 

UfOATE tP*CMN*a» C-M3RES ) 

OOMMENT. THIS UPDATE PUTS BINTAP SOURCE ON A FILE NAMED BINT 

COMMENT, FOR INPUT TO COMPASS. 

UPDATE tp«GMN*Q*C«SXNT) 

COMMENT. THIS UPDATE PUTS GIN J T SOURCE ON A FILE NAMED GI NT 

OOMMfNT. FOR INPUT TO COMPASS. 

UPDATE tP>CMN*Q*C»GINT> 



FILE7 
FILES 



— A COPY OF THE MAINTENANCE DECK. 

— A COPY OF A DECK TO INSTALL FROM THE 
BINARIES ON THIS TAPE OR THE BINARIES 
ON A MAINTENANCE TAPE. 



INSTALLATION MODIFICATIONS. 



001 
002 
Q03 
004 
005 
00$ 
007 
008 
009 
010 

oil 

012 
013 
014 
015 
016 
017 
018 
019 
020 
021 
022 
023 
024 
025 

02$ 
027 
028 
029 
030 
031 
032 
033 
034 
035 
036 
037 
038 
039 
040 
041 
042 
043 
044 
045 
046 
047 
048 
049 
050 
051 
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ym CS » * »6RAS 9 »BN2» 1 00000 ) ogg 

COMMENT, THIS LOAD CREATES A FILE NAMED BNG «Hf OH CONTAINS THE 6RAS5 053 

COMMENT. ASSEMBLER TO BE EDITLIBED INTO THE SYSTEM. 054 

LIBRARY (RUN2P3) IcI 

LOAD(BN2) 05ft 

N009*. 1st 

COMPASS < I»BINT *B»BNB*S*PFMfExf *S*CPCTEXT ) 058 

COMMENT. MAKES LIBRARY Of ABOVE ROUTINES « IGS241. 059 

E0ITLI8 (SYSTEM) 060 

R€€)UE^ fG£N**P£^ _. j^ 

COMMENT. GINIT IS A PROGRAM U$E0 TO tR«N$Mif 6&IO RESIDENT. 062 

COMPASS ( I *GINT »8»GI N* S»PFHT£X? »$*€PCTEXT ) 0*3 

CATAL0G<6lNtOIN,ID»G41»RP«999) 064 

LIBRARY UGS241) 065 

GRASS CORES, BNT) 066 

REWIND (BNT) «67 

REQyESTCGf INT* # PF) 6ft 

fc^MENT. GFINT IS A FILE CONTAINING FORM ATEOGRfO RESIDENT. 06Q 

BiNTAPtGFINT) 070 

CATALOG (GFJNf »GFINTtlD«IGS241tRP*999) 07? 

7/8/9 J 7 J 

•/ MODIFICATIONS TO GRASS SHOULO FOLLOW THIS CARD. 073 

#/ 074 

«/ MODIFICATIONS TO ©RIO RESIDENT SHOULD FOLLOW THIS CARD. 07$ 

*/ 076 

•/■ MODIFICATIONS TO BINTAP SHOULD FOLLOW THIS CARD. 077 

*/ 078 

«/ MODIFICATIONS TO GINIT SHOULD FOLLOW THIS CARD. 079 

#/ . 080 

7/8/9 081 

7/8/9 083 

♦COMPILE GRIDRES 084 

7/8/9 iss 

♦COMPILE BINTAP 086 

7/8/9 087 

♦COMPILE GINIT 088 

REWIND (8NG1 090 

REWIND CBN8) 091 

DF*nv/cvcTcu.nm» ^_r 

LIBRARY ( IGS241 rOLD) 093 

ADD1**BNB»AL«U 094 

ADDI*»BNG»AL*1) 095 

FINISH. 096 

COMPLETE. 097 

ENDRUN.^ 098 

6/7/8/9 099 
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CMFMANT,CM60000»T2000»MT2. 



central memory routines, 
this deck is issued to facilitate the maintenance of 
241igs version 2.1. this job requires a maintenance 
form tape (either the pl24 tape from the installation 
run or the output tape from a previous maintenance run) 
as input. the input tape will be requested as pl24* 
an output Tape will be created as Follows- 



NPL24 ~ A NEW MAINTENANCE TAPE WITH MODIFICATIONS. 



IF AN EDITLIB IS NOT DESIRED* DELETE 
EDITLIB (SYSTEM) - CARD 37" 
7/8/9 THRU ENDRUN. -CARDS 53 THRU 60 



COMMENT. 

COMMENf. 

COMMENT. 

COMMENT. 

COMMENT. 

COMMENT. 

COMMENT. 

COMMENT. 

COMMENT. 

COMMENT . 

COMMENT . 

COMMENT . 

COMMENT . 

COMMENT . 

COMMENT. 

COMMENT. 

COMMENT . 

LiABCL (PL24,R*L*241CMF2P1*3P**D*HI ) 

COPYBF tPL24tCM0) 

COPYBF (PL24*NIL4 

Ct>PYBF(PL24»FILE3) 

dOPYBF (PL24*F1LE4> 

WmBF ( PL24 9 F ILE5) 

COPYBF (PL24*FIL£6) 

RewlNDICMQ*FlL£3fFILE4*FILE5»FILE6> 

UNLOAD (NIL) 

UNLOAD (PL24) 

COMMENT. THIS UPDATE MAKES NEWRL WIW 

UPDATE *P*CMO»F»N*CMN) 

UNLOAD (CMO) 

COMMENT. THIS UPDATE PUTS SOURCE ON 

UPDATE "(P=CMN»F»C«CMU) 

FTN(IaCMUfBaBNUSpPFMTEXT»S«CPCTEXT»OPT»l) 

COMMENT. MAKES LIBRARY OF ABOVE ROUTINES 

E&ITLIBiSYSTEM) 

REWIND (BN1) 

LABEL (NPL24*W*L*241CMF2P1*3P4»T*999*D*HI ) 

UPOAf E (P»CMN»F*N»NPL24.B) 

REWIND (NPL24) 

COPYBF (NPL24*Z> 

COPYBF <BNl»NPL24) 

COPYBF (FILE3.NPL24) 

COPYBF (FILE4»NPL24) 

COPYBF (FILES »NPL24) 

COPYBF ,(FILE6»NPL24) 

UNLOAD (NPL24) 

7/8/9 

•/, MODIFICATIONS TO CENTRAL MEMORY ROUTINES SHOULD FOLLOW THIS CARD. 

*// 

7/8/9 

7/f/9 

REWIND (8N1) 

READY WSTEM»QLD) 

LIBRARY ( IGS241 »QLD ) 

REPLACE (BYT5UB6+Q8GEXEC*BN1) 

FINISH* 

COMPLETE. 

ENDRUN. 

7/8/9 

6/7/8/9 



INSTALLATION DECK 
MAINTENANCE DECK 
INSTALL FROM BINARIES 
VERIFICATION DECK 



INSTALLATION MODIFICATIONS. 



FILE CMU FOR FTNX USE. 



I6S241 



001 
002 
003 
004 
005 
006 
007 
008 
009 
010 
Oil 
012 
013 
014 



017 
018 
019 
020 
021 
022 
023 
024 
025 
026 
028 
029 
030 
031 
032 
033 
034 
035 
036 
037 
038 
039 
040 
041 
042 
043 
044 
045 
046 
047 
048 
049 
050 
051 
052 
053 
054 
055 
056 
057 
058 
059 
060 
061 
062 
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RMFMANT»CM6OOOO»T200O»MT2. 



COMMENT . 
COMMENT. 
COMMENT. 
COMMENT. 
COMMENT. 
COMMENT. 
COMMENT. 
COMMENT. 
COMMENT. 
COMMENT. 
COMMENT. 
COMMENT . 
COMMENT. 
COMMENT. 



THIS DECK IS ISSUED TO FACILITATE THE MAINTENANCE OF 
241 I6S VERSION 2.1. THIS JOB REQUIRES A MAINTENANCE 
FORM TAPE (EITHER THE PL25 TAPE FROM THE INSTALLATION „ 
RUN OR THE OUTPUT TAPE FROM A PREVIOUS MAINTENANCE RUN) 



AS INPUT. THE INPUT TAPE WILL BE REQUESTED AS 
AN OUTPUT TAPE WILL BE CREATED AS FOLLOWS- 



PL25, 



NPL25 — A NEW MAINTENANCE TAPE WITH MODIFICATIONS. 



DESIRED* DELETE 
REQUEST (6 IN »*PFJ -CARDS 48 
ANQ PURGE (JUNC*...) -CARDS 

CARDS 



TO 
53 
58 



50 

AND 

AND 



54 
60 



IF AN EDITLIB IS NOT 

EDITLIB (SYSTEM) THRU 

CATALOG (GIN*GIN» . . . ) 

REQUEST (GF I NT ♦»PF) AND CATALOG(GFINT».. . ) 

7/8/9 THRU ENDRUN -CARDS 91 TO 100 
LABEL (PL25fR*L«241RMF2Pl»3P4» D»HI ) 
C0PYBF(PL25»CM0) 
C0PYBF(PL25»NILt4) 
C0PYBF <PL25*F*l-E6) 
COPYBF (PL25»FIL€7 1 
COPYBF4PL25* FILES) 
REWIND (CM0?FILE6»FILE**FILE81 
UNLOAD (NIL) 

WNLQAD(PL25) ... 

COMMENT. THIS UPDATE MAKES NEWPL WITH INSTALLATIGN MODIFICATIONS. 
UPDATE (P«CMO»F*N»CMN) 
UNLOAD (CMO) 

COMMENT. THIS UPDATE PUTS THE GRASS ASSEMBLE* SOURCE ON A FILE NAMEn 
COMMENT, GRAS FOR INPUT TO THE RUN COMPILER. 
UPDATE (P*CMN.Q*C=GRAS) 

COMMENT. THIS UPDATE PUT? THE GRID RES10ENT SOURCE ON A FILE NAMED 
COMMENT. GRES FOR INPUT TO THE GRASS ASSEMBLER. 
UPDATE (P«CMN»Q*C*GRES ) 

COMMENT. THIS UPDATE PUTS BINTAP SOURCE ON A FILE NAMED BINT 
COMMENT. FOR INPUT TO COMPASS. 
UPDATE (P=CMN»Q*C*BINT) 

COMMENT. THIS UPDATE PUTS G1NIT SOURCE ON A FILE NAMED 6INT 
COMMENT. FOR INPUT TO COMPASS. 
UPDATE (P=CMN»Q»C«GINT) 
mm (<;... aRA.^**8w2. ioaqoo) 

COMMENT^ THIS LOAD CREATES A FILE NAMED BNG WHICH CONTAINS THE GRASS 
COMMENT. ASSEMBLER TO BE EDITLIBED INTO THE SYSTEM. 
LIBRARY (RUN2P3) 
LOAD<BN2) 
N060. 

COMPASS ( I*BINT»B«BN8*S«PFMTEXTtS*CPCTEXT) 
COMMENT. MAKES LIBRARY OF ABOVE ROUTINES * IGS241. 
fPITLIB(SYSTEM) 

PURGE (JUNK v GIN* |0»G4! ) -* 

REQUEST (GIN t*PF* 

COMMENT. G-tMIT IS A PROGRAM US£D TO TRANSMIT GRID RESIDENT. 
COMPASS ( I «GINT ♦B*GIM» S*PFMTEKT »S*CPCTEXT ) 
C ATALOG ( G I N *6 1 N » I D*G4 1 ♦ RP-999 ) 
PURGE CJUNC*GFINT*ID«IG5241 ) -«- 
LIBRARY ( I GS241) 
GRASS ( GRES »BNT) 
REWIND(BNT) 
J*EQUEST(GF INT ••PF> 



Pull these PURGE cards if no 
previous level of RMFMANT 
exists in the system. 



ooi 

002 
003 
004 
005 
006 
007 
008 
009 
010 
Oil 
012 
013 
014 
015 
016 
017 
018 
019 
020 
021 
022 
023 

024 
025 
026 
027 
028 
029 
03Q 
03 J 
032 
033 
034 
035 
036 
037 
038 
039 
040 
041 
042 
043 
044 
045 
046 
047 
048 
049 
05§ 
051 
052 
053 
054 
055 
056 
057 
058 
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BlNTAPtGFINT) 

CATALOG ( GF INT »GF INT » 1 0*t6S24I?RP*999* 

REWIND <BNG*BNB»GIN*GFINT) 

L*SEL CNPL 25+ W *L =241 RMF2P4 «3P4 * *»999* D*Hli 

UPDATE <P«CMN»F»N«NPL25»B) 

REWIND (NPL25) 

C0PY6F(NPL25»Z) 

QOPYBF tBNG»NPL25) 

CjOPYBF IBNB t NPL25 ) 

pOPYBFiGI N , NPL25 I 

COPYBF tGFINT ♦ NPL25 ) 

COPY BF CFILE6*NPL25 ) 

C0PYBF(F1LE7»NPL25) 

COpYBF CFILE8»NPL25) 

MNfc0AD(NPL25) 

••/ MODIFICATIONS TO GRASS SHOULD FOLLOW THIS CARD. 

»/ 

♦/ MODIFICATIONS TO GRID RESIDENT SHOULD FOLLOW THIS CARD. 
»/ 

V MODIFICATIONS TO BINTAP SHOULD FOLLOW THIS CARD. 

•/. ■ 

•/ MODIFICATIONS TO 6INIT SHOULD FOLLOW THIS CARD. 

•/ 

?/$/9 

•COMPILE GRASS 



Compile gridres 



•compile bintap 
ffk/9 

JJOOMPILE -61 MIT 

•fcWIND(BNG) 

U|WIND<BNB) 

*t AD Y (SYSTEM* OLD) 

IJflRARY (IGS241 fOLDi" 

WPl ACE ( GRASS *BNG»AL*1> 

HfcPLACE (BINTAP *8NB» AL*1 > 

FINISH. 

WtPLETE. 

mom** 

f#8i?9 
fctf/B/9, 



059 

aes 

062 

G*3 

064 

065 

066 

067 

068 

069 

070 

071 

072 

073 

07* 

075 

076 

077 

078 

079 

080 

081 

082 

083 

084 

085 

086 

087 

088 

089 

090 

091 

092 

093 

094 

095 

096 

097 

098 

099 

100 

10* 

102 
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001 

CMF8IN*CM600qO»T2000»MTl. MiiiBt _- 002 
COMMENT. INSTALL 241/I6S FROM BINARIES) 

LABEL <PL24*R,L*241CMF2P1»3P4.D*HI) 00 ^ 

C0PYBF(PL24*X) 005 

UNLOAD (X) 006 

C0PYBF<PL24*BNl) 007 

EDITLIB (SYSTEM) . 008 

C0PYBF(PL24»Z»3) 009 

UNLOAD (Z) _■ - 010 

pOMMENT. PUNCH VERIFICATION DECK. 01! 

COf¥BFtPL24» PUNCH) 012 

f/hti oi3 

READY (SYSTEMtQLD) 014 

LIBRARY < 165241 »0L0) 0J5 

REWIND CBNl") 016 

A0D1**BN1> 017 

FINISH. 018 

COMPLETE. 019 

PIDRUN. 020 
6/7/8/9 



001 

RMFBIN»CM60000*T2000*MT1. „ AtiTTKICC 00? 

COMMENT. INSTALL 241/IGS REMOTE ROUTINES. 003 

COMMENT, FROM BINARIES. § m ■ P¥TCT<1 004 

COMMENT. ASSUMES I6S241 LIBRARY EXISTS^ QQe> 

COMMENT. FROM INSTALLATION OF CM. ROUTINES. 006 

LABEL (PL25tR»L«241RMF2Pl«3P4»D«HI) 00 7 

COPYBF iPL25»X) 008 

UNLOAD (X) 009 

C0PYBF(PL25*BN6). 010 

C0PYBF(PL25»BNB) Oil 

EMTL IB (SYSTEM) 012 

REQUEST (GfNfW) 013 

COpYBF «PL2§VSIN* 014 

CATALO0*(0IN*^IW* ■ JING^-l * RP»9991 015 

ReQUEST,GFlNT**PF. a|£ 

C0PYBFtPL25»6FlNT) ..--- §17 

CA|ALiUV»lor *W:J |#F*n i f * v-r*v^-*** • UIB 

7/8/9 019 

READY (SYSTEM^QLD) 020 

LIBRARY* 165241 »OLD) 021 

REWIND (BNG) 022 

REWTNDtBNB) 023 

jlgg i « t BN8 ■'• AL*U 034 

A00t**BN6*AL«D 025 

FINISH. <W5ft 

COMPLETE* 027 

!lttUN> °^B 
6/7/8/9 
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JOB3»CM5OOO0tT50O. 

COMMENT. MAKES A PERM FILE OF VRFY. 

REQUEST <VRFY»«PF) 

FTN<B==VRFY) 

CATALOG i VRFY t VRFY ♦ ID*CDC > 

7*£/9 

program vrfy 

dimension ibuf(40),mess<24)tiprt(4) 

data ialf/4l0k0k7 

Data jalfmlnono/ 

data<m£$s(j)»j=1,4> 

*/t0M* THIS IS ♦lOHA VERIFICA.10HTION TEST »10H* / 

0A^A<M£SS<J>»J*5»8> 
■♦■ /l OH PICK ANY tlOHpART OF SQ UOHUARE WITH •10HLIGHT PEN / 

DATA < MESS Cjr,J»9» 12) 
■•• YlOH THE PICK aOHWILL BE QU*10HEUED AS A •lOHBUTTON / 

OATA(MESSIJ) ,J=13tl6) 
■-* /JOH IF PICK ItlOHS GOOD THE »10H SQUARE WItlOHLL VANISH / 

0ATA<MESS(J)»J*I7.2§> 

* /10H AND MESG. tlOH OKOK WILLtlOH BE DISPLA »IOHYED. / 
DATA (MESS <J)tJ«21,24> 

* /XQH IF PICK I»10HS BAD* NONtlOHO WILL APPtlOHEAR. / 
lOC«*2$IDT*8fIDDT«5$IODC«6SNCON»i$NBYTE*0 

CALL GICNJB(NCON) 

CALL GICLRXNCON) 

CALL GIMASK<NC0N»33»8»8) 

vjh*«400 S JV*400 S I«0 $ IENO«10H 

1*0 
DO 82 J»lt6 
DO 81 K»l»4 
81 *PRT(K>»MESS(K*I) 

CALL GURSET (JH»JV.O»IBUFf MBYTE* 200) 

PAUL GUAN(IPRT»40»IBUF*NBYTE*200> 
CALL G1PISP(1»IBUF»N8YTE*IDX> 
JV*JV-40 
■ 1*1*4 
8£ CONTINUE 
C DR*W OUTSIDE SQUARE. 

CALL GURSET <-5OO*-50O*lOOB«IBUF*NBYTE*2O0> 
CALL GUSE6S (-500, -500»-500,*500»l »9»IBUFVNBYTE. 200) 
CALL GUSEG (♦500»*500f 1 ) 
CALL GUSEG( 500 * -500*1) 
C*LL GUSEG(-5O0*-5OO» 1 ) 
CALL GJDISP<1#IBUF^NBYTE»IDDAO»I0T»IDC) 
11 CONTINUE 

CALL GIBUT(0tl*LDT*LDC1 
IFCLDC .EQ. 2) GO TO 10 
CALL 0URSET*-100*-lOO»0»|BUF,NeYTE»2OO) 
CALL GUAN ( JALF*4 1 IBUF»NBYTE> 200 ) 
CALL GIPISP ( 1 . IBUF»NBYTE* JDOAD* IDDTt IDOC) 
GO TO 11 
10 JfR«IDOAD 

CALL* GIERAS'UER) 

CALL. GURSET *-|OO**lOO*0»iBUF»NBYTE»2OO> 

CALL GUAN ( JALF*4. |8UF*N8YTE*2O0> 

CALL GIDISP ( I * IBUF*N8YTE# JQDAD* IDDT » IDDC) 

CALL GIMOVE(0»0»4*JDDAO) 
CALL GICNRLJNCON) 
END 

i>ft/9 

7/8/9 
6*7/8/9 
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VERIFICATION PROCEDURE 

When the installation of 6000/241/IGS Version 2.1 is complete, the EDITLIB of 
the IGS central routines will be complete, the files GIN and GFINT will be 
made permanent, the PASSWORD files entered, and INTERCOM enabled in the 
system. 

Execution of job deck 4, file 6 of the release tape, PL24, will produce the 
file, VRFY, which will be used to verify the installation of 241 IGS. 

Enter the BOOTSTRAP into the remote terminal memory using the Deadstart 
Initialization Procedure. After valid user name and password have been 
entered and accepted by INTERCOM, the word COMMAND will be displayed: 

1. Type: FETCH, VRFY, CDC, press SEND key 
Response: COMMAND 

2. Type: XEQ,LOAD=VRFY,SATISFY=IGS241 , EXECUTE, press SEND key 
Response: Program VRFY will send: 



"THIS IS 


A VERIFICATION 


TEST" 




PICK 


ANY 


PART 


OF SQUARE 


WITH 


LIGHTPEN 


THE 


PICK 


WILL 


BE QUEUED 


AS A 


BUTTON IF 


PICK 


IS 


SOOD, 


THE SQUARE WILL 


VANISH 


AND 


MESS 


. OKOK WILL BE 


DISPLAYED. 


IF P I CK 


IS BAD NONO WIL 


L APPEAR. 



3. Using lightpen, with LPCAPT light on, pick a portion of the square. 

4. The sequence, as stated, should proceed. The display will then be 
cleared and control returned to Command Mode. 

5. Type: LOGOUT., press SEND key 



TERMINAL OPERATING PROCEDURES 

Procedures for using the 241 Remote Terminal depend on the following 
circumstances: 

1 . Deadstart Initialization Procedure 

This procedure is required when it is not certain whether the 
resident program is intact. Partial destruction might be caused by 
preventive maintenance, emergency maintenance, a Power OFF condition, 
or a manual change in the resident program. 

2 . Normal Operating Procedure 

This procedure assumes that the resident program is intact. The 
resident program should be assumed to remain unchanged even though 
the previous user may have aborted his job. 
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2 


7500 


0062 


2 


7501 


2200 


2 


7503 


4021 



DEADSTART INITIALIZATION PROCEDURE 

1. Press MC (Master Clear) button. 

2. Press LOAD ADDR button. 

3. Press KBD button (to see what is entered via the keyboard-buttons 
through 7) . 

4. Enter 7500 via keyboard (7500 should be visible in keyboard display) . 

5. Press STEP button once , press Bank 2 button. 

6. Press WRITE MEM button. 

7. Enter code as defined in the GRIDRES listing, beginning at Bank 2, 
location 7500. For example: 

The listing contains- 

BOOT 
7101 

Enter 0062 via keyboard, press STEP button (once ) 

Enter 2200 via keyboard, press STEP button ( once ) 

Enter 7101 via keyboard, press STEP button ( once ) 

Enter 4021 via keyboard, press STEP button ( once ) 

The address to be entered can be verified by pressing P - button. 

8. Press LOAD ADDR button. 

9. Enter 7500 via keyboard. 

10. Press STEP button, press Bank 2 button. 

11. Press OPR MEM button. 

12. Press PROC MODE button. 

13. Press RUN button. 

14. Press ON LINE button. 

15. Dial 6000 computer via data phone. 

16. When connection is made, the numbers 4,3, 2, 1 appear on the CRT. 
After the initialization program is established, the words LOADING 
GRID appear on the CRT. 

17. When the total resident routine is loaded, the bootstrap will LOGOUT 
automatically. A cursor will appear on the upper left .corner of the 
CRT indicating the user can LOGIN. 
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TABLE FORMATS 



The table formats are intended to serve only as reference material for those who are familiar with SCOPE 3.4 
and its product set; more detailed information is available in the various reference manuals and internal main- 
tenance specifications. 

Section 1 contains formats of tables that are part of CMR. Generally, they are of interest only to SCOPE and 
INTERCOM system programmers. 

Section 2 contains formats of tables that can be used by central processor programs running at a control point. 
Section 2 is generally of interest to all users of the product set. 

Section 3 contains formats of tables residing on mass storage devices. Generally, they are of interest only to 
system programmers. 

Section 4 contains formats of tables and areas that reside in ECS. ECS formats are generally of interest only 
to SCOPE system programmers. 

Unless reserved for a specific purpose or group, all currently unused fields, names, codes, etc. are reserved for 
future standard development. 



60307400 A H-i 



3.4 TABLE FORMATS CONTENTS 



SECTION 1 - CENTRAL MEMORY RESIDENT TABLES 

Central Memory Resident 

CMR Pointer Area 

Channel Status Table and Channels 

PP Status Words 

Exchange Package 

Control Point Area 

System Job Exchange Package Area 

PP Communication Area 

PP Program Name Reservations 

Monitor Functions 

Equipment Status Table 

Device Codes 

File Name Table 

Disposition Code Values 

INTERCOM Table and Multiplexor Subtables 

Device Activity Table Entry 

Tape Staging Table 

Attached Permanent File Table 

Request Stack Entry and Stack Processor Order Codes 

Record Block Reservation Table 

Device Status Table 

Device Pool Table 

Sequencer Table 

Rotating Mass Storage Diagnostic Table 

VSNBUF 

T. TAPES Table 

Removable Pack Table Entry 

Mailbox 

Dayfile FET and Buffer Area 

Peripheral Job Table 

Scheduler Performance Table 

Job Control Area 

Job Descriptor Table Entry 

CEFAP Buffer Area 

Empty Page Stack 

Subpage Buffer and Record Descriptors 

ECS Buffer for RMS-ECS Transfer 

CMR Directory 

Library Name Table Entry 

PP Program Name Table Entry 

CM Resident Library Format 

EPNT/ERT/PNUT/PNT Entry Formats 

INTERCOM Pointer Area 



II-l-l 
II- 1-3 
II- 1-4 
II- 1-9 
II-1-10 
II-1-10 
II-l-l 1 
II-1-15 
II-1-16 
II-1-18 
II- 1-24 
II- 1-26 
II- 1-28 
II- 1-30 
II- 1-3 8 
II- 1-40 
II- 1-43 
11-143 
II- 1-44 
II- 1-45 
II- 1-46 
II- 1-47 
II- 1-48 
II- 1-49 
II-1-50 
II- 1-51 
II-1-52 
II- 1-53 
II- 1-53 
II- 1-54 
II- 1-5 5 
II- 1-56 
II-1-57 
II-1-57 
II- 1-60 
II- 1-61 
II- 1-62 
II- 1-64 
IM-65 
II- 1-65 
II- 1-66 
II- 1-66 
II- 1-67 
II-1-68 
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II-iii 



Interlock Table Formats II- 1-70 

Multi-user Job Table II-1-71 

High Speed User Table H- 1 .72 

Low Speed User Table II- 1 .76 

274 IGS User Table IM.gO 

LCC User Table II- 1-81 

Record Block Table Entry n- 1 -88 

SECTION 2 - JOB CONTROL POINT TABLES II-2-1 

RA Communication Area II-2-3 

File Environment Table H-2-5 

SCOPE CIO Codes H_2-6 

Local Scratch File Names II-2-7 

Entry Point Names II-2-9 

FET Codes II-2-10 

File Information Table H-2-12 

File Definition Block II-2-18 

REQ Function Parameter List II-2-20 

Standard Character Sets H-2-22 

SECTION 3 - DISK TABLES AND FILE FORMATS II-3-1 

Permanent File Directory Entry n.3.3 

RBT Catalog Entry II-3-4 

W Record Header II-3-5 

I Block Header II-3-5 

Block Format (DA File) II.3.5 

Index Block Format (IS File) II-3-6 

Data Block Format (IS File) H-3-6 

FSTT(ISFile) n-3-7 

FSTT(DAFile) II.3.9 

Swap File Format II-3-11 

Public RMS and Disk Pack Label II-3-1 2 

SECTION 4 - EXTENDED CORE STORAGE TABLES II-4-1 

ECS Format II-4-3 

Inter-Computer Area II-4-4 

System Pointer Area II-4-5 

Flaw Table II-4-6 

System Page H_4_6 



Il-iv 
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SECTION 1 
CENTRAL MEMORY RESIDENT TABLES 
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CENTRAL MEMORY RESIDENT 




100 
154 
200 





Pointers 




Channel Status Table 




PP Status Words 


T.CPA n 


Control Point Areas 


T.XPIDLA 


System Exchange Packages 


T.PPC n 


PP Communication Areas 


T.EST 


Equipment Status Table 


T.FNT 


File Name Table 




CIO-CPCIO Special FNTs 




Permanent File FNTs 


T.ITABL 


INTERCOM Table 


T.DAT 


Device Activity Table 


T.STG 


Tape Staging Table 


T.APF 


Attached Permanent File Table 


T.RQS 


Request Stack 


T.RBR 


Record Block Reservation Table (Headers) 


T.RBRBIT 


RBR Bit Table 


T.DST 


Device Status Table 


T.DPT 


Device Pool Table 


T.SEQ 


Sequencer Table 


T.RMS 


Rotating Mass Storage Diagnostic Table 


T.iNS 


Installation .Area 


T.VSNBUF 


VSN Buffer 


T.TAPES 


Tapes Table 


T.RPT 


Removable Pack Table 


T.MAIL 


Scheduler Mailbox Buffer 


T.DFB 


Dayfile Buffers 


T.PJT 


Parameter Storage for Delayed PP Jobs 


T.SCHPT 


(Optional) Scheduler Statistics 




juicuuici ouu v^oiiuisi Mica 


T.SCHJDT 


Scheduler Job Descriptor Table 


T.BCFAP 


CPMTR CEFAP Buffer 


T.EPAGE 


Empty Page Stack 


T.ECSPRM 


ECS Parameters 


T.SUBPG 


Subpage Buffer 


T.ECTL 


Description of T.EBUF Area 


T.EBUF 


ECS Buffer for RMS-ECS Transfer 




CM Resident Programs 


T.LIB 


Library Directory 




INTERCOM Pointer Area 




INTERCOM Small Buffers and User Tables 




INTERCOM Large Buffers 



*Table Must 
tTable Must 



Begin Before 10000 8 
Begin Before 20000 8 
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59 



47 



CMR POINTER AREA 
35 23 



11 



P.ZERO 



P.LIB 

P.RBR 
P.RBT 

P.NPP 
P.NCP 
P.DFB 

P.SEQ 
P.FNT 
P.HEC 

P.CST 

P.PCOM 

P.EST 

P.PFM1 



P.PFM2 



P.INS 



P.EIRPR 



P.ELBST 



P.RQS 

P.DPT | 
P.TAPES [ 
P.RMS ) 

P.STG 



P.INT 



P.PFM3 



Zeros 


C.DIRFWA 

a FWA of Library 
Directory 




LWA+1 
Library Directory 


C.DSFLAG 
Deadstart 
Load Flag 


C.RBRAD 

FWAof RBR Area 


RBT Ordinal 
of Empty Chain 


Length/1 00B of 
RBT Area 


C.CMLWA 

(LWA+1 )/100B of 

CM 


FWA/8 of 
Dayfile Buffer 


(Reserved for 
250 Graphics Package) 


C.NPP 
No. of PPs 


C.NCP 
No. of CPs 


FWAof 
FNT 


LWA+1 of 
FNT 


C.SEQ 
T.SEQ/8 


C.SEQL 
L.SEQ 


C.HEC 

Hardware 

Error Count 


FWA of 
EST 


LWA+1 of 
EST 


C.CST 
FWA of CST 


C.CSTL 

LWA+1 of 

CST 


C.PCOM 

Address of 

Comm Area PP1 


C.SDTL 
N.SD 


C.APFL 
N.EAPF 


C.PFACT 

Activity 

Count 


C.APF 
T.APF 


C.PFMCH 
Toggle Byte 


C.SDL 
C.ESD 




(Reserved for Installations) 


C.LEPAGE 
L.ECSTK+1 




C.ECSPRM 
T.ECSPRM 


ICC Area Address 


Max. Length/1000B 

of ECS 

Library File 


ECS Flaw Table Address 


ECS Page Stack Address 


T.DAT 


L.DAT 


C.RQSFS 

FWA/2 of 

Request Stack 




No. of 

DST 

Entries 


FWA/8 of 
DST 


TTAPES/8 


L.TAPES 


C.RMS 
T.RMS/8 


C.RMSL 
L.RMS 


C.DPT 
T. DPT/8 




C.STG 
T.STG 


C.INT/C.IFL 

Control Point 

FL 


C.ITABL 


C. 


IBUFF 

Start of INTERCOM 
pointer area 


C.ILTABL 


C.RBTC1 


C.RBTC2 


C.RBTC3 


C.RBTCL 
N.RBTC 


C.PFFNT 
FWAof 
PF FNTs 


i i 







10 



11 



12 



13 



14 



15 



16 



17 



II- 1-4 
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P.LIB(l) 



Library change bit 





C.DSF] 


LAG 






Bit 





S.SYSEDT 


l=bypass EDITLIB "GO/DROP" 


message (internal to deadstart) 




1-2 


S.EDTRUN 


01=EDITLIB running 






3-5 


S.ECSLVL 


ECS level 
000=no ECS 
001=ECS up 






6 


S. ACTION 


0=load 
l=recovery 






7-8 


S.SYSLVL 


System level 

00=A 

01=B 

10=C 

11=D 






9 


S.PFLVL 


PF level 

0=initiallize 

l=check 






10-11 


S.LBLLVL 


RMS label level 

00=initiallize 

01=check 




P.PFM1(6) 


C.PFMCH 






Bit 





S.RBTCW 


RBTC wraparound 






1 


S.APFIL 


APF interlock 






2 


S.PFDIL 


PFD interlock 






3 


S.RBTCIL 


RBTC interlock 






4 


S.PFUTIL 


Utility interlock 






5 


S.MDIL 


MD interlock 






6 




TRANSPF lockout 
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CMR POINTER AREA 



59 



47 



41 



35 



23 



11 



T.JDATE 



P.NRBR 



T.BJDT 



P.EVICT 



P.CMFL 



T.CPJOBN 

P.PJT 

P.SPDROP 

T.EPBL 
P.ECSFL 

T.CLK 

T.SLAB1 
T.DATE 

T.SLAB2 



T.SLAB6 



T.MSP 



(Leading Zeros) Y Y D D D 


Number of 
Request Stack 
Entries (N.RQS) 


Number of 
RBR Headers 
(N.RBR) 




Size of Total 

RBR Area (L.RBR) 


Julian Date in 
Binary (YYYDDD) 




Time in Binary 
(HHMMSS) 




Trace Buffer 
T.TRB/8 




Machine 
FL/100B 


ASYSTEMaaa 


Job Sequence 
Number 


C.SPDROP 
DST Ordinal 
for 1SP Drop 


Job Count 


C.PJTFWA 
T.PJT/8 


C.PJTLWA 
T.PJT/8+L.PJT/8 


C.ECSPL 

ECS Page Length 


C.ECSBL 

ECS Buffer Length 


C.CPECFL 

Direct Access 

ECS FL/1000B 


H H MM S S 


MM/ D D / Y Y 




System Label 

SCOPE 

Version 

3.4 






















Debugger 


Step Flag 



20 



21 



22 



23 



24 



25 



26 



27 



30 



31 



32 



33 



34 



35 



36 



37 
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CMR POINTER AREA 



59 



47 



35 



23 



11 



T.MSC 



P.CHRQ 



P.PPLIB 



P.VRNBUF 



T.CPSTA 



T.CPSTB 



T.MXNCTL 



T.PPID 



T.PPIP 



T.SPF 



T.RCHN 

T.CPT1 j 
T.UAS | 

T.ECSPAR 
P.EPAGE 



Count of PP 

Job Queue 

Entries 



Number of 
Idle PPs 



Number of Seconds*4096 



Position of CIO 



C.VRNFWA 
T.VRNBUF/8 







C.VRNFIN 
Pointer to 
First VSN 



Idle Exchange 
Package Address 



Number of 
Programs 



C.STGFLG 

Stage 
ON/OFF 



Next Slice Time 



C.CHRQ 

First 10 

Channels 



C.CHRQ2 

Second 10 

Channels 



Address of 
First Entry 



C.VRNINT 

Buffer 

Interlock 



2 



C.VRNFUL 

Buffer Full 

Flag 



Active XP Address ~ 











STL Code 



20 



Active XP Address 



* * * # 



CP-MTR Requests 



PP-MTR Requests 



1 



PP input 
Register Address 




PP Input .. 
Register Address 



(Reserved) 



[Reserved) 



Control 
Point Number 



EST Ordinal 



(Reserved) 



SPM-1RN Communications Word 



Unassigned 
CM/100B 



Unassigned 
ECS/1000B 



C.EPAGE 
T.EPAGE 



ECS Size 



ECS Flaw 
Table Flag 



First RBT 
Word Pair 
to Release 



Initial CMTR 
P Address 



ECS Parity 
Flag 



ECS Parity 
Address/1 000B 



40 



41 



42 



43 



Hescheduiing 



OFF 



EXN 

MXN 



50 



51 



52 



53 



54 



55 



56 



57 



MAN 



L = 



I Turned Off 
I 1 Locked Off 



0CPUA 
1 CPUB 
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P.SCH 



P.STR 



T.SCHCP 



T.SCHPP 



P.RPT 

P.MAI L ) 
P.SWPECS} 
P.SCHPT I 



P.ILR 
P.PPOVL 



47 



CMR POINTER AREA 
35 23 



11 



C.SRSL 

C.LEJDT 

LE.JDT 



C.NFL 
Needed 
FL/100B 



T.RPT/8 



C.MAILF 
T.MAI L/8 



C.SRS 
T.XPSCH/10B 



C.JQP 

Queue Priority of 

Job in Counter 



CJCA 
T.SCHJCA/8 



C.RFL 
Reserved 
FL/100B 



C.LJDT 
L.SCHJDT 



C.STMF 
SCH Recal 



Interlock Word (Scheduler) 



Interlock Word (PP Routines) 



L.RPT 



C.MAILL 
L.MAIL 



C.SWPECS 
L.ECSSWP 



C.SCHPT 
T.SC HPT/8 



(Reserved) 



(Reserved) 



C.ILR 



IP.ILR 



U 



C.PPOVL 
T.PPOVL/10B 



0= No ILR 
1 = 64-bit ILR 
2= 128-bit ILR 



P.SWPECS(65) C.SWPECS 



C.JDT 
T.SCHJDT/8 



C.AFL 
Available 
FL/100B 



T.ELIBD 



The bits in C.SWPECS determine which jobs are swapped to ECS. If no bits are set, only 
INTERCOM and graphics jobs swapped to the central memory queue and MUJ jobs are 
swapped to ECS. Additional job types are swapped to ECS as follows: 

Bit 1 = 1 NTE RCOM and graphics jobs at end of command 

(EOJbitset) 

1 1 = Batch jobs in the central memory queue 

2 1 = All I NTE RCOM and graphics jobs 

3 1 = All batch jobs 



60 



61 



62 



63 



64 



65 



66 



76 



77 
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CHANNEL STATUS TABLE 





48 


C.CSTCN 36 


C.CSTCB 


26 


24 




12 










Channel Number 




C 


X 


Y 



MMTC Conversion Table 
00 -No Table 
01 -EBCDIC 
10 -ASCI I 
11 — Reserved 



X 



Address of this word 



Y Same as X when channel not reserved 
PPI R address when reserved 



CHANNELS 



00-13 Hardware channels 

14 CH.FST 

15 CH.FNT/CH.ILR 

16 CH.LIB (GRAPHICS software only) 

17 CH.RBT 

20-33 Hardware channels 

34 CH.CPA 

35 CH.PFM 

36 CH.INS 

37 CH.DMP 

40 CH.EST = CH.TAPE 

41 CH.iCOM INTERCOM/SCOPE communication interlock 

42 CH.IEMBF INTERCOM empty buffer channel 

43 CH.IUSER INTERCOM user table channel 

44 CH.SCH scheduler channel 

45 CH.IHUSR High speed user table channel 

46 CH.IHSMT High speed empty buffer channel 
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PP STATUS WORDS 



59 



T.PPS1 



47 



35 



23 



Control 




Field 


Point 


PP Status 


Access 


Address 




Flag 



Channel I/O Time 



154 f 



177 e 



EXCHANGE PACKAGE 



10 



17 





P 


A0 


BO 




CMRA 


A1 


B1 




CMFL 


A2 


B2 




EM 


A3 


B3 


ECSRA 


A4 


B4 


ECSFL 


A5 


B5 


MA 


A6 


B6 




A7 


B7 


XO 
X7 



15 
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CONTROL POINT AREA 



59 



47 44 41 



35 



29 



23 



17 14 11 



J 



W.CPUST 
W.CPLINK 

W.CPTIME 

W.CPTIMB 

W.PPTIME 
W.CPPTM 

W.CPSTAT 

W.CPFL 

W.CPEF 

W.CPJNAM 

W.CPCC 

W.CPECS 

W.CPDFM 

W.CPPRI 
W.CPJCP 
W.CPTIML 

W.CPSWP 
W.CPINT 

W.CPSCH 
W.CPRO 

W.SSW 
W.CPSSW 



Exchange Package 



1° 



C.CPSTAT 
Status Byte 



C.CPSLIC 
M.RCLCPTime 
or Slice Period 



C.CPUQS 
CPU-A 



C.CPUQMS 
Seconds*4096 
This Quantum 



C.CPUQS C.CPUQMS 

CPU-B Seconds*4096 
This Quantum 



C.CPPQS C.CPPQMS 

PP Seconds*4096 

This Quantum 



C.CPEF 
Error Flag 



C.CPLINK 
Previous Active 
Control Point 



Next Active 
Control Point 



C.CPUAS 
Total CPU-A Time as Number of Seconds*4096 



C.CPUBS 
Total CPU-B Time as Number of Seconds*4096 



C.CPPTS 
Total PP Time as Number of Seconds*4096 



C.CPSM 
Storage Move 



C.CPRA 
RA/100B 



C.CPJNAM 



Job Name 



C.CPRPV 

Reprieve 

CKSM Value 



C.CPRPA 



Reprieve Address 



C.CPNFL 

Nominal 
FL/100o 



C.CPECRA 

szr*c* d a /innnn 
t«_.o n/-v iuuud 



C.CPFL 
FL/100B 



JDT 
Ordinal 



C.CPNCSP 
Next Control 
Card Pointer 



C.CPECFL 

CV^O T !_/ IUUUD 



4 



Last Dayfile Message 



C.CPTIML 
Current Time 
Limit (15 Bits) 



C.CPTLI 

Initial Time 
Limit (15 Bits) 



C.CPQNT 

Quantum 



C.CPFLG 
Swap Flags 



C.CPJQP 

Job Queue 

Priority 



C.CPRPRI 
Job Class 



C.CPECSI 
Initial ECS 
FL/1000B 



C.CPUTA 



User Table 
Address 



C.CPRFL 
Reserved FL 



C.CPFLI 

initial 

FL/100B 



C.CPORG 
C.CPEVNT Job 
Flaas I Oriain 



C.CPJDA 

JDT Address 

(Absolute) 



C.CPSSVV 

Sense 
Switches 



(Reserved) 



(Reserved) 



[Reserved) 



(Reserved) 



17 
20 

21 

22 

23 

24 

25 

26 

27 
30 

37 

40 

41 
42 
43 
44 
45 
46 
47 
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CONTROL POINT AREA 
47 42 35 23 



17 



11 



W.CPFACT 
W.CPFST 

W.CKP 
W.CPCKP 

W.CPOAE 
W.CPVRNO 

W.CPLDR1 

W.CPLDR2 
W.CPLS 

W.CPLDR3 
W.CPAR 

W.CPSTG 

W.CPDFMC 

W.CPDPV 

W.CPIRB 

W.CPFP 

W.CPOUT 

W.CPFLAG 

W.CPERT 

W.CPMSLM 

W.CHTIM 

W.CPMSI 

W.CPSR 

W.CPCAF 
W.CPCAL 



Account Parameter for Permanent Files 



FST Entry for Next Control Card PRU 



C.CPREQ 
Req Flag 



fer 



Relative Address 
of Tape Label Info 



C.CPCON 

Console 

Checkpoint Flag 



C.CPCKP 

Number of 

Checkpoints 



C.CPOAE 

Equipment 

Assigned 



Extended Label Format 

Family Pack VI D Assignment 



C.CPLW 

C.CPLT 

Loader Flags 



Global Library 



Set 



Indicators 



RA+1 Contents (and Control Point Number) 
of Last Auto-recall Request 



C.CPAR 



Reply Word Address 



C.CPTMT 
MT 



C.CPDFMC 

Dayfile 
Msg Count 



C.CPFLAG 
Flags 



C.CPTNT 
NT 



C.CPRBID 

INTERCOM Batch 

Routing ID 



C.CPFST 
FST Address 



C.CPMSLO C.CPMSLM 
MS Limit Saved 
During Swap 



MS Limit in PRU's 



C.CPMNT 
MT I NT 
Max Max 



C.CPDPV 
Job Dep. ID 



C.CPFP 

C.CPOUT 

Flags 



C.CPMSRC 

Running PRU Count 



C.CPSITM 

Time of Swap-In 



C.CPSR 



Channel Time as Number of Seconds*4096 



C.CPESR 
(Non-zero During 
ECS -Disc Transfer) 



Control Card Buffer 



50 

51 

52 

53 

54 

55 

56 

57 

60 

61 

62 

63 

64 

65 

66 

67 
70 



167 
170 



i 



Reserved for Installations 



f m 



IM-12 
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NOTES: CONTROL POINT AREA 



W.CPLINK(2 


0) 


C.CPSTAT 




Bit 





S.CPUSTM 


Move flag - move in progress 




1 


S.CPUSTY 


Auto recall 




2 


S.CPUSTA 


CPUA assigned only 




3 


S.CPUSTB 


CPUB assigned only 




4 


S.CPUSTX 


Recall status 




5 


S.CPUSTW 


Wait status 




6 


S.CPUSTR 


Real time job 




7 


S.CPUSTC 


Active CPUA 




8 


S.CPUSTD 


Active CPUB 




9 


S.CPUSTS 


Control point activity suspended 




10 


S.CPUSTP 


Suspended by check point 


W.CPEF(24) 


C.CPEF Values: 




0001 




F.ERTL 


Time limit exceeded 


0002 




F.ERAR 


Arithmetic error 


0003 




F.ERPP 


PPU abort (M.ABORT) 


0004 




F.ERCP 


CPU abort (ABT in RA+1) 


0005 




F.ERPCE 


PP call error (garbage in RA+1) 


0006 




F.EROD 


Operator drop 






F.IUABT 


INTERCOM user abort 


0007 




F.ERK 


Operator kill (batch job only) 


nmn 




C CT>T>M 


r>~-,,~ ru„4-~u :„u „„ua 


\JKI l \J 




X .JJilVLVL'* 


lvciuii (^uaiui juu VLiiyj 


0011 




F.EREX 
F.ERCC 


Control card error 


0012 




F.ERECP 


ECS parity error 


0013 




F.ERJC 
F.ICCD 
F.IJBCRD 


Job card error 


0014 




F.ERPA 


Pre-abort (batch job only) 


0015 




F.ERRCL 


Auto-recall error 


0016 




F.ERHANG 


Job hung in auto-recall 


0017 




F.ERMSL 


Mass storage limit exceeded (bat< 


0020 




F.EROVL 


PP overlay not in PP LIB 


W.CPSWP(41) C.CPORG Values: 




Value 


4 


Real time 






10 


Graphics 






20 


Multi-user 






40 


INTERCOM 




Bit 


6 


Swap out event bit 
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NOTES: CONTROL POINT AREA (CONT'D) 



W.CPSCH(42) C.CPFLG Values: 



Bit 



3 

4 

5 

6 

7 

8 

9 

10 

11 



S.CP1IB 

S.CPFFL 

S.CPEOJ 

S.CPCLR 

S.CPRFL 

S.CPROP 

S.CPSIP 

S.CPSOP 

S.CPSWC 



1IB bit 

FNTs in positive FL 

End of job 

Control point area clear request 

Storage request 

Roll out 

Swap in 

Swap out 

Swap out complete 



W.CPCKP(52) 

Bit 



C.CPCON 

Console checkpoint request 



W.CPLDR1(55) 



Bit 



1 

2-3 

4 

5 

6-9 

10-11 



C.CPLW 

S.CPLP 

L 

S.CPLT 

R 

M 

W 



Program loaded from non-system library 

Library set indicator 

Debugging aid flag 

Reduce flag 

Map Options 

Indicator for loader to be used 



W.CPLDR1(55) 
W.CPLDR2(56) 
W.CPLDR3(57) 

00 
01-76 

77 



Global Library Set Indicators: 

End of global library set 

LNT ordinal of system library 

User library; lfn of first user library in W.CPLDR3; lfn of second user library 



W.CPFLAG(63) 

Bit 

2 
3 



C.CPFLAG 

S.CPLDAF 

S.CPNFNT 



MDI interlock 
Private pack overflow 
If on, do not search FNT 



W.CPFP(63) 

Bit 





1 

2 

3 

4 

5 

6 

7 

8 

9 

10 

11 



C.CPFP 

S.CPL 

S.CPG 

S.CPA 

S.CPS 

S.CPN 

S.CPX 

S.CPDP 

S.CPEOR 

S.CPJFL 

S.CPJ 

S.CPR 

S.CPE 



Reprocess 

Abort 

No return 

Sequencer 

Checkpoint taken 

EXIT card encountered 

Private disk pack 

Control card EOR 

Job card field length assigned 

JANUS 

Remote batch 

INTERCOM 
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SYSTEM JOB EXCHANGE PACKAGE AREA 

47 35 29 23 14 11 



T.XPSCH 

W.CPUST/W.CPSLIC 

W.CPTIME 

W.CPTIMB 

W.PPTiME 

W.XPIR 

W.XPOR 

Scheduler Only 
T.SCHRS 

T.MTRRS 

t \zni r-»i A 
i ./\r i ui_/-\ 



i 



Exchange Package 

for 

Scheduler and Storage Move 



C.CPSTAT 
Status Byte 



C.CPSLIC 
Total CPU Time 
Slice A lotted 



C.CPLINK 
Previous Active 
Control Point 



Next Active 
Control Point 



CPU-A Scheduler/Storage Move Time 



CPU-B Scheduier/Storage Move Time 



PPU Idle Time 



Scheduler Input Register 



Scheduler Output Register 



Scheduler Request Stack Table 



LSCHRS=4 



CPMTR MTR Request Stack 



LMTRRS=4 



W.CPTIME 
W.XPIR 

T.XPIDLB 



orij-n iuic r ruyidin tXC 

P=CP.MTR (if IP.ECSB#0, 

FL=400000B ECS FL=17777777B 

B2=1 B5=L.ECSTK 

B7=0 A6=T.EPAGE) 



Status of 
Idle Ex. Pkg. 



Accumulated 
Slice Time 



Exchange Package Links 



CPU-A Idle Time 



W.CPTIME 
W.XPIR 



[If IP.MCPU=2) CPU-B Idle Program Exchange Package 
P=CP.MTR (If IP.ECSB^O, 

FL-400000B ECS FL=17777777B 

B2=1 B5=L.ECSTK 

B7=1 A6-T.EPAGE) 



Status of 
Idle Ex. Pkg. 



Accumulated 
Slice Time 



Exchange Package Links 



CPU-B Idle Time 



t 



I 
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PP COMMUNICATION AREA 



FOR PPO 





59 


1 


7 





W.PPIR 


CPCIO Output Register 


W.PPOR 


MTR Output Register 


W.PPMES1 




W.PPMES2 




W.PPMES3 


7HDAYFILE 


000030 


W.PPMES4 





W.PPMES5 


7HCERFILE 


0030 


W.PPMES6 






Extend for 
System Dayfile 



Extend for 
CERFILE 



FOR PP1 



W.PPIR 

W.PPOR 
W.PPMES1 
W.PPMES2 
W.PPMES3 
W.PPMES4 
W.PPMES5 
W.PPMES6 



DSD Input Register 



DSD Output Register 



Stack Request Parameters 



Control Point 
Message Buffer 



DSD - 1DL Communication Word 



2< 

— LU 

D < 



O 
O 



II- 1-16 



60307400 A 



PP COMMUNICATION AREA 
FOR PP2 THROUGH PPn 





59 








39 


35 






W.PPIR 




Program 


| C.CPNUM 
Name or 


I 


W.PPOR 


MTR 

Function 

Code 




L 

— Ret 


- Control Point No. 
:all 
ed from event or delay stack 










W.PPMES1 








/STACH 




n 


W.PPMES2 










< 

LU 


W.PPMES3 






COMMUNICATION WORD 


DC 

< 

O 


W.PPMES4 










< 

C 

c 


c 

3 

* 

5 


W.PPMES5 








EVEr 


siT STACK PARAMETERS 


5 


W.PPMES6 










V 



59 



COMMUNICATION WORD 
35 23 



17 



11 



C.RWPPCF 


C.RWPPWT 


C.RWPPLW 


C.RWPPCC 


C.RWPPWC 


Control 


Cumulative 


PP Buffer 


C.RWPPST 


Current PRU Byte 


Point 


Byte Count 


Length 


J Code and Status Count 
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PP PROGRAM NAME RESERVATIONS 

Routine Name Description 

|j AOO (010000) Stack Processor segment 

ACE Advance control card 

CCP 6000 station routine 

CEM Central error manager for ECS 

CIO Preliminary I/O request processor 

CKP Saves information necessary to restart a checkpoint job 

CLO Dummy program used to call CIO 

CON INTERCOM-connect file to remote terminal 

CP1 C.E.-415 card punch test 

CR1 C.E.-405 card reader test 

CY1 Resets FNT of file being processed by restart 
DF4 ' C.E.-3234 test 

DF7 C.E.-3553 test 

DF8 C.E.-808 test 

DIS Console display program for a control point 

DLE C.E. Diagnostics 

DMP Dump CM 

DPF Dump permanent files to tape 

DSP Dispose function processor 

EKG Private pack closing- 1EJ 

EPF Send audit information to CM 

FAD INTERCOM 

FNT INTERCOM-FNT alter routine 

GBJ INTERCOM-274 Graphics begin job 

GEJ INTERCOM-274 Graphics end job 
IAP INTERCOM-initiate another program 

IEF Routine for CEFAP 

RJP INTERCOM-initiate user program 

JDP Job dependency count decrementor 

LDL Loader utility program 

LDV Loads CPU absolute overlays 

LDW Loads CPU absolute overlays in conjunction with LDV 

LOC Load octal corrections 

LPF In conjunction with LOADPF, reloads permanent files 

LPT C.E.-501 line printer test 

LP1 C.E.-512 line printer test 

MAC INTERCOM 

MDI Used by EDITLIB to handle I/O involved in changing and moving directory 

MEM Process memory function 

MES INTERCOM-writes messages to remote terminal 

MSD INTERCOM 

MSG Issues dayfile messages 

MTT C.E.-60X tape test 

MVJ INTERCOM-Multi-User Job 

OPE Dummy program used to call CIO 

PFA Permanent file manager attach function 

PFC Permanent file manager catalog function 
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PP PROGRAM NAME RESERVATIONS (CONT'D) 

Routine Name Description 

PFD Attaches permanent file directory to control point 

PFE Permanent file manager extend function 

PFP Permanent file manager purge function 

PFR Permanent file manager rename function 

PFS Permanent file manager position function 

PPI Reserved 

PRM Permission checking function 

QAJ Reserved 

REQ Makes non-allocatable device assignment and formats FNT entries for allocatable devices 

in response to request control card or a request macro call. 

RMS Routine for CERMS 

RPV Reprieve central program 

RST Restores control point area of restart job 

RWE INTERCOM-checks for INTERCOM job 

SLT Reserved 

SRB Used by EDFTLIB to complete the disk address of a record 

STS Used by CP program to obtain certain status 

TBL INTERCOM-Get table 

TDS Terminate deadstart 

TPF Transfer permanent files and permanent file table 

TPT Transfer permanent file tables 

T76 INTERCOM 

Uxx Reserved for installations | 

VSM STIMULATOR routine 

VSN Volume serial number card processor 

XDQ PP portion of dump queue 

XRO PP portion of restore queue 

nUx Reserved for installations 1 

0ZA-0Z9 PL10 drivers 

1AJ Advance job 

1BR INTERCOM-buffer manager 

1BT Blank label tape routine 

1CI INTERCOM-Queue Manager 

1CL Close function for all non-tape or non-permanent files 

1CR Tape read recovery — write CM for 9-track tapes 

1CS Tape read recovery — write CM for S tapes 

1CT Tape read recovery - write CM for SCOPE tapes 

1C9 Write CM for tape read recovery 

IDA Process private packs 

IDF Dump dayfile 

1DL Overlay loader and dayfile message processor for DSD 

1DM Device queue manager 

IDS INTERCOM - H-display 

1DU Used in conjunction with DPF to clear dump flags and directory entries 

1EJ End of job processor 

1EP Twin stack processor for processing system double buffer stack requests for ECS buffering 
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PP PROGRAM NAME RESERVATIONS (CONT'D) 

Routine Name Description 

1FC Creates an RBTC entry for PF catalog 

1GJ INTERCOM 

1GM Issues GOOD MORNING when time changes from 23.59 to 00.00 

1GR INTERCOM 

1IB Initiate batch job from input queue 

IIS INTERCOM-Send dayfile message to terminal 

1IM INTERCOM-Send message to terminal 

1IQ Initiate JANUS control point 

1IR Main JANUS routine; drives readers, punches, printers, etc. 

US Initialize overlay setup 

1IU Called by JANUS to backspace print file 

111 INTERCOM-Initialization 

1LT Loads jobs from tapes 

1LX INTERCOM 

IMF Multifile positioning routine 

1MH Tape scheduling/prescheduling routine 

1MT Long record stranger tape driver 

1NO Tape read recovery noise record verifier 

1NR * 9 track tape read driver 

1NW 9 track tape write driver 

1N2 Tape read recovery noise record read forward 1 

1N3 Tape read recovery noise record read forward .2 

10P -■ File open routine for non-tape files 

IPC Drop permanent file mass storage 

1PD Called by PFA to either enter event stack, call another PP routine or swap out 

1PF Permanent file queue manager 

1PJ INTERCOM - Process job card 

1PK Sequential disk pack close 

1PL Dummy plot program 

IPS 6000 Station routine 

1PT INTERCOM— Low speed remote batch processor 

1P1 Tape recovery to LGR positioning driver 

1P2 Tape recovery write driver 

1P3 Tape recovery verification driver 

1P4 Tape recovery to LGNR positioning driver 

1QM INTERCOM-Check for MUJ swap-out completion 

1QP INTERCOM-Quantum calculator and MUJ servicer 

IRC Restores field length of a checkpoin ted job 

1RN Ages queues, manages RBT chains and statuses tape drives 

1RP End of reel processor 

IRQ REQ overlay 

IRS Read stranger tape driver 

1RT Read SCOPE tape driver 

1RV Tape I/O read recovery driver initializer and terminator 

1R2 Tape read recovery - tape parity error recovery 1 



II- 1-20 60307400 A 



PP PROGRAM NAME RESERVATIONS (CONT'D) 

Routine Name Description 

1R3 Tape read recovery — tape parity error recovery 2 

1R9 SCOPE tape 9 track (659) read tape driver 

1SI Routine to swap-in or roll-in a job 

ISO Swap-out or roll-out a job 

ISP Mass storage I/O processor (stack processor) 

1SX Error message and abort function for stack processors 

1S5 Load and execute ISP or 3DO at second entry 

1TD Dump output files to tape 

1TF Tape forward motion routine 

1TO Tape open routine 

ITS Tape sampler 

1VG STIMULATOR routine 

1WB INTERCOM-Wideband driver 

1WI SCOPE internal tape write driver 

1WS Stranger tape write driver 

1W9 SCOPE tape 9 track (659) write tape driver 

1XG INTERCOM- 1XP overlay used for graphics 

1XP-6XP INTERCOM-High speed EXPORT processor 

1ZA-1Z9 INTERCOM drivers 

2GJ INTERCOM 

21S Reservoir of routines for IIS 

2LP 3256/3659 driver for an on-line print file 

2ME INTERCOM-Message sending routine 

2PC 3446 card punch driver 

2RC 3447 card reader driver 

2RP Overlay to IRP-End-of-reel processor 

2TA Tape assignment overlay 

2TB All backward tape motion 

2TC Extended trailer label group processor 

ITT T, 1„+~ :~U ~ n *-A 

z,u liaiiiiait juu i,aiu 

3CF INTERCOM - Overlay to 1CI 

3CI INTERCOM - Overlay to 1CI 

3CT INTERCOM - Overlay to 1CI 

3CU INTERCOM - Overlay to 1CI 

3CX INTERCOM - Overlay to 1CI 

3DO Initialize allocatable device file 

3EP ECS version of 6603-1 disk driver 

3EQ ECS version of 6638 disk driver 

3ER ECS version of 865 drum driver 

3ES ECS version of 854 disk packs driver 

3ET ECS version of 6603-II driver 

3EU ECS version of 814 disk driver 

3EV ECS version of 821 disk driver 

3EW ECS version of 841 MDD driver 

3LX INTERCOM-Overlay to 1LX 

3ME INTERCOM-Overlay to 2ME 

3PK User-pack initialization 
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PP PROGRAM NAME RESERVATIONS (CONT'D) 

Routine Name Description 

3PM Segment of 1P1 used for holding code for future use 

3PO Segment of 1P3 that processes uncorrectable parity error GO or RECHECK code 

3PS Segment of 1P4 used for holding code for future use 

3RQ REQ overlay containing 2TACOM 

3SP Driver for 6603-1 disk 

3SQ Driver for 6638 disk 

3SR Driver for 865 drum 

3SS Driver for 854 disk packs 

3ST Driver for 6603-11 disk 

3SU Driver for 814 disk 

3SV Driver for 821 disk 

3SW Driver for 841 MDD 

3SY 844 driver 

3TT INTERCOM-Transmit data from CPU to terminal 

3T1-3T2 INTERCOM-Overlays to 3TT 

4ES Enter stack request 

4LB ANSI standard label processor 

4LC 3000 label processor 

4LX INTERCOM-Overlay to 1LX 

5DA Initiate or destroy file on private pack 

6BR ANSI label processor read function code overlay 

6BW 4LB overlay 

6CR 3000 label processor read function code overlay 

6CW 3000 label processor write function code overlay 

6LC Segment of 4LB or 4LC to load conversion table into MMTC 

6LM Segment of 4LB used to construct tape label messages 

6L1 4LB inlay to convert PRU count 

6L2 BCD conversion table inlay for 4LB 

6L3 4LB inlay to check that proper conversion table is in the MMTC 

6L4 4LB inlay for debug message writer 

6L5 4LB inlay to format the label information 

6L7 4LB inlay to pack and write label to tapes table 

6MD Dummy EDITLIB overlay 

6NO Tape error recovery debug segment assembled to give more detail about segment beinj 

read by 1NO 

6PA Prints system bulletin before header 

6SI Process Swap-in parity errors 

6WM Outputs dayfile error messages for I/O requests 

7EC Generate ECS buffers 

7T1 ASCII/Display code conversion table 

7T2 EBCDIC/Display code conversion table 

7W1-7W2 Overlay for 6WM 

8AA-8A9 Reserved 

8BA-8B9 Reserved 

8CA-8C9 C.E.-Reserved names 

8DA A display overlay for DSD (dayfile buffers) 

8DB B display overlay for DSD (control point status) 
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PP PROGRAM NAME RESERVATIONS (CONT'D) 
Routine Name Description 



8DC 

8DE 

8DF 

8DH 

8DK 

8DL 

8DM 

8DO 

8DP 

8DQ 

8DR 

8DS 

8DX 

8DY 

8DZ 

8D1-8D9 

8EA-8E9 

8FA-8PS 

8G0 

8NO 

8PT 

8PU-8W9 

8T3 

8XA 

8XB 

8XC 

8XD 

8XE 

8XF 

8XG 

8XH 

8X1 

8XJ 

8XK 

8XL 

8XM 

8XN 

8X0 

8XP 

8XQ 

8XR 

8X1-8X9 

8YA-8Y9 

8ZA-8Z9 

9AA-9PS 

9PT 

9PU-9Y9 

9ZA-9Z9 



C display overlay for DSD (central memory) 

E display overlay for DSD (equipment status table) 

F display overlay for DSD (file name table) 

H display overlay for DSD (I/O queues) 

K display overlay for DSD (pointers and control point area) 

L display overlay for DSD (central programmable) 

M display overlay for DSD (PP communications area) 

display overlay for DSD (operator message) 

P display overlay for DSD (tapes table and VSN previewing) 

Q display overlay for DSD (INTERCOM status) 

R display overlay for DSD (JDT tables and queues) 

S display overlay for DSD (job control area) 

X display overlay for DSD (ECS memory) 

Y display overlay for DSD (command format dictionary) 

Z display overlay for DSD (display dictionary) 

DSD 

DSD (7000 Station Display) 

Reserved 

Loaded by 1R3 when GO or DROP operator decision necessary during tape processing 

Segment to 1N3 that writes debug messages to day file if IP.DBUG=1 

INTERCOM - Overlay to 1PT 

Reserved 

Overlay to load MMTC memory 

Channel commands overlay for DSD 

Debugging commands overlay for DSD 

PPU calling control points requests commands overlay for DSD 

Equipment status commands overlay for DSD 

Control point commands overlay for DSD 

Deadstart commands overlay for DSD 

Priority and tape staging job control commands overlay for DSD 

INTERCOM commands for DSD 

Miscellaneous commands overlay for DSD 

Miscellaneous commands overlay for DSD 

Tape scheduling commands overlay for DSD 

Operator action manager commands overlay for DSD 

Error flag commands overlay for DSD 

CP-PP interlock commands overlay for DSD 

Initiate system jobs command overlay for DSD 

Tape assignment command overlay for DSD 

Bring up displays command overlay for DSD 

Divert a file command overlay for DSD 

DSD 

DSD (7000 Station Commands) 

INTERCOM PP drivers 

Customer Engineering 

INTERCOM 

Customer Engineering 

INTERCOM 
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MONITOR FUNCTIONS 



01 


M.SETST 


Set CPU status bits 


02 


M.CLRST 


Clear CPU status bits 


03 


M.RCP 




Request central processor 


04 


M.DCP 




Drop central processor 


05 


M.RCLCP 


Recall central processor 


06 


M.ICE 




Initiate central executive 




00 


EX.CMSM 


CM storage move 




01 


EX.ECSM 


ECS storage move 




02 


EX.ECOVL 


ECS overlay load 




03 


EX.SPM 


Call stack processor manager 




05 


EX.SCH 


Call scheduler 




06 


EX.SCH1 


Call scheduler (storage request entry) 




07 


EX.REQEB 


Request ECS buffer 




10 


EX.RELEB 


Release ECS buffer 




11 


EX.REQSB 


Request system buffer 




12 


EX.RELSB 


Release system buffer 




13 


EX.MVIN 


Move data to ECS from system buffer 




14 


EX.MVOUT 


Move data from ECS to system buffer 




15 


EX.FLHB 


Flush buffer 




16 


EX.CSWAP 


Clean ECS after ECS RPE in swap file 




17 


EX.AUTEB 


Terminate automatic allocation 




20 


EX.ECD 


Display ECS 




21 


EX.ECR 


Release display 




22 


EX.ECW 


Modify ECS 




23 


EX.CEM 


Clear CEM-working flag 




24 


EX.DDPER 


Process DDP overlay loading error 




25 


EX.ECLDV 


Make successive partial reads of ECS record 


07 


M.CPUST 


Change CPU status (IP.MCPU f 1) 


10 


M.SLICE 


MTR interrupts CPMTR at end of time slice for job 


12 


M.RCH 




Reserve channel 


13 


M.DFM 




Process dayfile message 


15 


M.STEP 




Enter step mode 


16 


M.RBTSTO 


Request RBT storage 


17 


M.RSTOR 


Request storage 


20 


M.TSR 




Terminate storage request (IP.RTMTR # 0) 


21 


M.DPP 




Drop PP 


22 


M.ABORT 


Abort control point and drop PP 


25 


M.SEQ 




Assign job sequence number 


26 


M.SEF 




Set error flag 


27 


M.ISP 




Initiate stack processor 


30 


M.SPRCL 


Stack processor recall 


31 


M.CCPA 


Change control point assignment 


32 


M.RPJ 




Request peripheral job 


33 


M.EES 




Enter event stack 


34 


M.CPJ 




Capture peripheral job 


35 


M.SCH 




Initiate integrated scheduler 


36 


M.PASS 




MTR ignores it - to be cleared by another routine 


37 


M.RACT 


Request control point activity 


41 


M.NTIME 


Enter new time limit 
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MONITOR FUNCTIONS (CONT'D) 



42 


M.NOTE 


43 


M.PPCH 


44 


M.BUFPTR 


45 


M.PATCH 


46 


M.TRACE 


47 


M.SLPER 


77 


MLKILL 



Null function, cleared immediately. Used as break point 

Request channel surveillance 

Buffer pointer address 

Enter a patch into MTR 

Turn on MTR trace 

XJ to other CPU 

Bad monitor request made 
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EQUIPMENT STATUS TABLE 



PUBLIC RMS DEVICE ENTRY 
59 47 



35 32 29 



23 



11 



C. EST AT 
11001 I I 1000000 



{t 



C.ESTDL 
Device Label 
RB 



Eqp. 
No. 



Unit 
Number 



t 



C.ESTMNE 
Hardware 
Mnemonic 



C.ESTDST 
DST Ordinal 



S.ESTSYS — System Device 

S.ESTPFD — Permanent File Directory Device 

S.ESTPF — Permanent File Device 



ON/OFF Bit 



PRIVATE RMS DEVICE ENTRY 

59 51 47 



35 32 29 



23 



11 



C. EST AT 
1100000 



t 







Eqp. 
No. 



Unit 
Number 



t 



C.ESTMNE 
Hardware 
Mnemonic 



C.ESTDST 
DST Ordinal 



Control Point Number 
S.ESTBSY- BUSY Bit 
S.ESTFR- FREE Bit 



ON/OFF Bit 



MAGNETIC TAPE ENTRY 

59 51 47 



41 



35 



29 



23 



118 6 



C. EST AT 

oi loooooo 



t 



C.ESTCH1 



Channel 
B 



L- Control I— 



(Channel 
A 



C.ESTCH2 

Channel I Channel 

D C 



t 



C.ESTMNE 
Hardware 
Mnemonic 



Eqp. 
No. 



Unit 
Number 



t 



Tape Status 
Check 
in Progress 



Control 
Point 
Number 



6681/6684 



ON/OFF Bit 



MMTC 
Bit 



UNIT RECORD EQUIPMENT ENTRY 

59 51 47 41 



35 



23 



11 8 



C. EST AT 
00000000 



t 



C.ESTCH1 



00 



Channel 



C.ESTSD 

Special 

Disposition 



t 



C.ESTMNE 
Hardware 
Mnemonic 



Eqp. 
No. 



Unit 
Number 



Control Point Number 



ON/OFF Bit 
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EQUIPMENT STATUS TABLE 



6612 DISPLAY CONSOLE ENTRY 

59 51 47 41 



35 32 29 



23 



C.ESTAT 



C.ESTCH1 

Channel 



Eqp. 
No. 



Unit 
Number 



*— Control Point Number 
Available Bit 



t 



C.ESTMNE 
DS 



ON/OFF Bit 



11 







MULTIPLEXOR ENTRY 

59 47 



41 



35 32 



23 



C.ESTAT 



t 



.ESTCH1 



00 



Channel 



Eqp. 
No. 







t 



C.ESTMNE 
Hardware 
Mnemonic 



11 



Index into 
MUX Subtable 



Available Bit 



ON/OFF Bit 



6000/7000 CHANNEL COUPLER 



59 






47 




35 




23 


11 







C.ESTA' 


r 




C.ES" 
00 


rem 

Channel 


Eqp: 
No. 


000 


Ji 


C.ESTMNE 
CC 


0000 






■— C 


ontroi Poir 


it Number 








-ON/OFF Bit 









DDP ENTRY 

59 



47 



41 



35 



29 



23 



11 8 



C.ESTCH1 



Channel 
2 



Channel 
1 



C.ESTCH2 

Channel i Channel 

4 13 



C.ESTMNE 
D P 



Eqp. 
No. 



c 



ON/OFF Bit 
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DEVICE CODES 





Device 


Mnemonic 


Type 


AA 


01 


AB 


02 


-- 


03 


AC 


04 


AL 


05 


AM 


06 


AP 


07 


AF 


10 


-- 


11 


AD 


12 


1 AY 


13 


-- 


14) 


-- 


15 i 


-- 


16 ( 


-- 


17 ) 


-- 


20 


-- 


21 A 



Description 

6603-1 disk 

6638 disk 

Data cell 

6603-11 disk 

821 data file 

841 multiple disk drive 

3234/854 disk pack drive 

814 disk file 

CDC reserved 

3637/865 drum 

Reserved for 844 disk pack 

CDC reserved 

ECS resident file 



-- 


27 ; 


-- 


30 ) 


-- 


37 ) 


MT 


40 xx 


NT 


41 xx 


-- 


42 xx 


-- 


43 xx 


TR 


44 


TP 


45 


-- 


46 


-- 


47 


LP 


50 


LI 


51 


L2 


52 


-- 


- * 53 ) 


-- 


54 I 


-- 


55 ) 


-- 


56 


-- 


57 


CR 


60 


-- 


61 


-- 


62xx 


-- 


63xx 



CDC reserved 



Reserved for installations, RMS devices only 

7-track magnetic tapef 
9-track magnetic tapef 
Member file 7-track tapef 
Member file 9-track tapef 
Paper tape reader 
Paper tape punch 
Reserved for installations 
Reserved for installations 
501, 512, 505 line printer 
501, 505 line printer 
512 line printer 

CDC reserved 

Reserved for installations 
Reserved for installations 
405 card reader 
Remote terminal keyboard 
7-track multi-file set tapef 
9-track multi-file set tapef 



f See following page 
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DEVICE CODES (CONT'D) 





Device 


Mnemonic 


Type 





64 


-- 


65 


-- 


66 


-- 


67 


CP 


70 


DS 


71 


GC 


72 


HC 


73 


FM 


74 


FL 


75 


-- 


76 


— 


77 



DC 
IX 
Wx 
Xx 

sc 

YC 
CC 
CS 
DP 



Description 

Pseudo code for tape staging 

CDC reserved 

Reserved for installations 

Reserved for installations . 

415 card punch 

6612 key board /display console 

252-2 graphic console 

523-2 hard copy recorder 

254-2 microfilm recorder 

Plotter 

Reserved for installations 

Reserved for installations 

6671 DSC 

Reserved for installations 

Reserved for installations 

Reserved for installations 

6673/6674 DSC 

6676 DSC 

6000/7000 channel coupler 

7077-1 communications station (LCC) 

DDP 



t Low order 
6 bits (xx) 


7-track 


9-track 


00 

01 

10 

11 

—00— 


Hi-density (556 bpi) 
LO density (200 bpi) 
HY density (800 bpi) 
CDC-reserved 
Unlabeled 


CDC-reserved 

CDC-reserved 

HD density (800 cpi) 

PE density (1600 cpi) 

Unlabeled 


—01 — 


U- or Z-labeled 


U- or Z-labeled 


— 10— 


Y-labeled 


Y-labeled 


— 11 — 


CDC-reserved 


CDC-reserved 


00 


SCOPE data format 


SCOPE data format 


01 


CDC-reserved 


CDC-reserved 


10 

11 


Stape 
Ltape 


Stape 
Ltape 
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FILE NAME TABLE 

ENTRY AND OPTIONAL SUPPLEMENT 
FOR FILE IN INPUT QUEUE 



59 



53 50 47 



35 



23 



— Lock Bit 
i— Link Bit 



C.FNAME 



C.FLINK 



Job Name 



0000 



C.FTAPE/C.FNT 

MT I NT 
Count Count 



C.FFRBA 
First RBT 
Word Pair 



C.ECFL 
ECS FL/1000B 



C.FINTID 
INTERCOM ID 



C.FLNKAD 

Link to 
Supplement 



C.FFL 
CM FL/100B 



C.FCPU 
C.FABT 
C.FRRN 

1 



C.FTL 



Time Limit 



C.FDC 

Disposition 

Code 



C.FINFLG 



C.FPRI 
Priority 



Job Card Error 
I — JANUS Pre-abort 
Rerun 



■No FL Specified 



I — Real Time Job 



00 = CPU-A/CPU-B 
20 = CPU-A only 
40 = CPU-Bonly 
60 = 7000 only 
77 = 6000 or 7000 



59 



47 



35 



23 



17 



0077 8 


C.FBKLK 
Backward Link 









0000 




C.FEQP 
Device Type* 


C.FFRBA 
First RBT 
Word Pair* 


C.FLRBWP 

Current RBT 

Word Pair* 


C.FCB 

$ ICurr. 
Byte 


C.FLPRU 
Current PRU* 


C.FDPCT 

Job Dependency 

Count 


C.FDPV 

Job Dependency 

ID 


C.FDC 
Disposition Code* 





*lf nonzero, fields apply to pre-OUTPUT file 
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59 



FILE NAME TABLE 

TAPE FILE ENTRIES 

BEFORE EQUIPMENT ASSIGNMENT (GNT) 



47 




C.FNAME 



C.FLINK 



Logical File Name 



C.FLNKAD 

Link to Optional 

Supplement 



C.FEQP 
64„ 



Volume Serial Number 



Allocation Style 



Word 2 from REQ Function Parameter List 



L— VSN Valid 

— GNT Word 3 Filled in from REQ Parameter List 

— Label Address in Control Point Area W.CPOAE 

— Awaiting Tape Assignment 



SUPPLEMENT(S) IF MORE THAN ONE VSN GIVEN 



59 


47 


Multi-Reel File VSNs 
Alternate VSNs — 
35 21 






17 


r— L 

15 


nk Bit 

— Control Point Number 
11 


00 7 7 8 


C.FBKLK 
Backward Link 




I 





1 






C.FLNKAD 

Link to Optional 

Supplement 


0000 


Volume Serial Number 


0000 


00 


Volume Serial Number 


0000 



59 



47 



SUPPLEMENT IF 2MT/2NT DECLARED 

2MT/2NT Supplement - 
35 23 19 



15 



•Control Point Number 
11 



00 7 7 c 



C.FBKLK 
Backward Link 



0000 



C.FEQP 
Device Type 



C.FTPORD 
T.TAPES Ordinal 



EST Ordinal 



7777 c 



7 7 77 r 
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FILE NAME TABLE 



59 



53 



TAPE FILE ENTRIES AFTER EQUIPMENT ASSIGNMENT 
MULTI-FILE SET MASTER ENTRY 

i— Control Point Number 

47 35 23 17 



11 



C.FNAME 



Multi-File Set Name 



C.FCPNUM 







00 



C.FLNKAD 



C.FEQP 
Device Type 



C.FTPORD 
T.TAPES Ordinal 



C.FPDEV 

Primary EST 

Ordinal 



CV 



t 



Number of Set 

Member Last Opened 

(Binary) 



FNT of Member 
Last Opened 



£ 



Conversion Mode (NT) — 10 = US 
Z Labels -01=EB 

NR (No Error Recovery) 
NS (Nonstandard Labels) 



End-of-Set 
E/N Bit 



TAPE FILE ENTRY DURING PROCESSING 



59 



53 



47 



35 



23 



17 



Link Bit 
i— Control Point Number 



C.FNAME 



Logical File Name 



C.FLINK 
C.FCPNUM . 



C.FLNKAD 
Link to FNT 
Supplement 



C.FEQP 

C.DEVTP 

Device Type 



C.FTPORD 
T.TAPES Ordinal 



C.FPDEV 

Primary EST 

Ordinal 



C.FCPRU 
C.FLBL 

Current PRU Count 



C.FFETAD 

FET Address 



C.FDC 
Disposition Code 



C.FSC 



t 



Perm 



t 



Code and Status 



Conversion Mode (NT) — 10 = US 
Z labels -01 = EB 

NR (No Error Recovery) 
NS (Nonstandard Labels) 



E/N Bit 
FNT Write Bit 
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FILE NAME TABLE 



ENTRY FOR LOCAL RMS FILE 
BEFORE ASSIGNMENT TO A DEVICE 

Lock Bit 



1 



■Link Bit 



r Control 
Pt, No. 



59 



53 



47 



35 



23 



17 



C.FNAME 



Logical File Name 



C.FPPFN 



C.FCPNUM C.FLINK 
I 



C.FEQP 
Device 
Type 















Family Pack Bit 
■ Sequential Pack Bit 



Permission Bits — * 



10 
11 9876 




C.FLNKAD 

Link to 
Supplement 



C.FALLOC 
Flags 



Dei erred Assignment 
(Reserved) 
ECS Buffered 
(Reserved) 
Overflow Allowed 
PF Device 



C.FALLOC 

Allocation 
Style 



Flags 



■ Family 
Number 



00 = No ECS Use 
10 = ECS Use; Supplement 
Required 

Sequential Pack E/N Bit, or 
index Write Bit 



59 



53 



C.FEQP 
Device 
Type 



CFFETAD 



AFTER ASSIGNMENT TO A DEVICE 
AND THROUGHOUT PROCESSING 

Lock Bit — i 



47 



35 



23 



Logical File Name 



C.FFRBA 

First RBT Word 

Pair 



FET Address 



• Family Pack Bit 

• Sequential Pack Bit 



C.FLRBWP 

Current RBT 

Word Pair 



C.FDC 
Disposition Code 



C.FCB 



Link Bit 



■Control 
Pt- No. 



11 







ICurr. 
I Byte 



* 



OF ECS/ 
C.FPFREW 



Control Permission 

Modify Permission — J 

Extend Permission 

Read Permission 

FNT Write Bit 



4 



C.FLNKAD/C.FAPF 

Link or 

APF Pointer 



C.FLPRU 
Current PRU 



Code and Status 



PF Rewrite Bit 

Do not release RBT chain 

\ 00 = No ECS Use 

( 10 = ECS Use; Supplement 

Required 
Sequential Pack E/N Bit, or 
Index Write Bit 
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FILE NAME TABLE 

OPTIONAL SUPPLEMENTS FOR LOCAL RMS FILES 
SEQUENTIAL PACK FILE SUPPLEMENT 



47 



35 



23 



17 



-Control Pt. No. 
11 



00 7 7 8 


C.FBKLK 
Backward Link 


















T.RPT Ordinal 


Primary EST 


Secondary EST 








Visual Identifier of First Pack 


EST Ordinal of 
First Pack Assigned 



59 



INTERCOM-USER FILE SUPPLEMENT 
(Required only when file to be attached to swapped-out job) 



47 



41 



35 



23 



-C.FMUJC MUJCode 

-Control Pt. No. 
17 / 11 



h 



7 7 



C.FBKLK 
Backward Link 



(Reserved for 

Deferred 

Special DISPOSE) 



00 



C.FAPF 
APF Pointer 



User Table Address 



C.FLOCID 
INTERCOM ID 



59 



53 



ECS FILESUPPLEMENT(ECS resident files or 10 buffers) 



47 



35 



23 



17 



- Control Pt. No. 
11 



00 7 7 8 


C.FBKLK 
Backward Link 


(Reserved for 

Deferred 

Special DISPOSE) 




0( 


) 


C.FAPF 
APF Pointer 








Current 

Subpage 

Index 


Address of First Subpage 


Address of Current Subpage 










Backspace Count (ECS Overflow 
While Transferring from RMS to ECS) 



Word 1 Bit 54 Outstanding PPCIO Request Word 2 Bit 55 Release ECS Buffer 

55 ECS Preallocation Flag After the Current SR 

56 1 = Release Bit 56 Index Written (Close Random File 

57 = Output Buffer 59 Transfer in Progress (ECS 
1 = | n p U t Buffer Resident Random Files) 

58 Buffer Overflow 

59 1 = ECS-Buffered File 
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ECS FILE SUPPLEMENT 
(ECS Resident Library) 



59 



53 



47 



35 



23 17 



11 



7 7 8 


C.FBKLK 
Backward Link 


(Reserved for 

Deferred 

Special DISPOSE) 










Con- 
trol 
Pt. No 












EOI 
Index 


Address of First Sub page 


Address of EOI Subpage 






Current 
Index 


Addr. First Auxiliary Subpage 


Address Current Subpage 



Word 1 Bit 55 ECS Preailocation Flag 
56 1 = Release Bit 
59 1 = ECS Buffered File 



Word 2 Bit 59 Transfer in Progress 



60307400 A 



II-1-35 



FILE NAME TABLE 



ENTRIES FOR PERMANENT FILE TABLES 
(LAST ENTRIES IN FNT) 



59 



47 



C.FEQP 
Device Type 



C.FEQP 
Device Type 



C.FSDT 
SD Entry Count 



C.FSDT 
SD Entry Count 



17 



00 00 



Pointer to First PRU after Chain 



00 



Pointer to First PRU after Chain 



00 



Pointer to First PRU of Subdirectory 



59 


ENTRY FOR ON-LINE CARD READER FIL 
K 41 35 23 1 


E 

7 




f- Control Pt. No. 
11 o 


C.FNAME . 
Logical File Name l 


30 






0000 


60 8 


C.FRECCT 

Record Count 


C.FCREC 
Current 
Record 


C.FPDEV 
EST Ordinal 


00 ( 


E C.FLBL 

3 Card Count 

J 


00 


C.FFETAD 

FET Address 


0000 


Perm 






Code and Status 



59 53 



ENTRY FOR ON-LINE CARD PUNCH FILE 
23 17 



35 



i- Control Pt. No. 

11 



C.FNAME 



Logical File Name 



7 o 



00 







0000 



C.FFETAD 

FET Address 



C.FPDEV 
EST Ordinal 



0000 



C.F2PC 
2PC 

Flag 



0000 



C.FLBL 



Card Count 



Perm 



Code and Status 



II-1-36 
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FILE NAME TABLE 

ENTRIES AND REQUIRED SUPPLEMENT 
FOR FILES IN OUTPUT QUEUES 



59 




WAITING IN OUTPUT QUEUE 
47 35 23 18 


i- Lock Bit 

11 


C.FNAME 

Job Name 


00 


0000 


C.FEQP 
Device Type 


C.FFRBA 
First RBT Word Pair 


C.FLRBWP 

Current 

RBT Word Pair 


C.FCB 


Curr 
Byte 


C.FLPRU 
Current PRU 


Repeat 
Count 


C.FSDC/C.FIOTID 

Sector Count or Special 
Dispose or INTERCOM ID 


C.FDC 
Disposition Code 


(See Local 
RMS File) 


C.FPRI 
Priority 





59 


53 


47 


DURING PROCESSING 
35 23 


17 


15 


ink 


Bit 

JANUS Control Pt. I 
11 C 


Mo. 


i-*- 


C.FNAME 

Job Name 









C.FLNKAD 

Link to 
Supplement 




C.FEQP 
Device Type 


C.FFRBA 

First 

RBT Word Pair 


C.FLRBWP 

Current 

RBT Word Pair 


C.FCB 

ICurr 
(Byte 


C.FLPRU 
Current PRU 




C.FFETAD 

FET Address 


C.FDC 
Disposition Code 


(See Local 
RMS File) 


C.FCS 

Code and Status 












59 53 47 


35 23 17 15 


— JANUS Control Pt. No. 
11 




00 7 7 8 


C.FBKLK 

Backward Link 




OC 


) 




0000 






(Reserved) 






Repeat 
Count 


Sector Count 




C.FSPDIS 
Special Dispose 


C.FPRI 
Priority 





60307400 C 



II- 1-3 7 



DISPOSITION CODE VALUES 
Non-Allocatable Devices 



CK 


XXXI 


Checkpoint 


IU 


XXX2 


Inhibit unload 


CI 


XXX3 


Checkpoint and inhibit unload 


sv 


XXX4 


Save 


cs 


XXX5 


Checkpoint and save 




XXX6-7777 


Reserved 



Allocatable Devices 



Bit 


11 




10 




9 




8 




7 




6 


Low Order 6 Bits 


Code 


Value 




01 




02 




03 




04 




05 




06 




07 


PU 


10 


PB 


12 


P8 


14 


FR* 


20 




21 


FL* 


22 




23 


HR* 


24 




25 


HL* 


26 




27 


PT* 


30 




31-37 



INTERCOM user file (I) 

INTERCOM submitted batch job (RB) 

Reserved 

Special dispose file (SD) 

File named OUTPUT (O) 

Interrupted print file (IP) 



Description 

Reserved 

Reserved 

Reserved 

Input job ready for scheduling 

Input tape job 

Input tape job on VSN display 

Reserved 

Punch installation default character set from display code 

Punch 6000/7000 format binary 

Punch 80 column binary 

Film print 

Reserved 

Film plot 

Reserved 

Hard copy print 

Reserved 

Hard copy plot 

Reserved 

Rot 

Reserved 



s Not supported by SCOPE 3.4 
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DISPOSITION CODE VALUES (CON'T) 
Code Value Description 



PR 


40 


PI 


41 


P2 


42 




43 


PE 


44 




45-67 




70-77 



Any available 501/505/512 

Any available 501/505 

Any available 512 

Any available 512 with 48-character set 

Any available 512 with forms code PE. 

Reserved 

Reserved to installations 



60307400 A II- 1-39 



INTERCOM TABLE 



S.1 1 BR - 1BR Dropping 

S.1 111 — 111 in Progress 

S.IEDIT - EDITLIB in Progress 

S.I1PT- 1PT Drop Bit 

S.I1CI - 1CI Drop Bit 

S.IN01PT- No 1PT— i 

S.I1LX 



59 



47 



W.IUSID 
W.ICOM 

W.IENDLS 



C.ITUSID 

Last User ID 

Assigned 



C.ILSFL 
(LWA+D/100B 
of Small Buffers 



C.I1BR 

1LX 
Drop Bits 



32 



C.IUPF 



LCCUp-S.INTC 
, — High Speed Up - S.I NTH 
r Low Speed Up-S.INTL 



rLockout of 
LOGIN - 
S.ILKOUT 

22 



C.IFBUFR 



FWA of First 
Linked Buffer 



, LCC Drop Flag- S.INTC 

|— High Speed Drop Flag - S.I NTH 
-Low Speed Drop Flag — S.INTL 



C.INTDSD 



11 







Stimulator 
Flag 



Multiplexor Subtables 
(OneSubtableper MUX) 
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6671 MULTIPLEXOR SUBTABLE 



59 



53 



47 



35 



27 



11 



C.IOTFL 

Count of 

Output Failures 


C.ILSDT 
Count of Lost 
Data Failures 


C.IMPAR 

Count of MUX 

Memory Parity Errors 




C.INPTS 

Number of 

ports serviced 


C.INBUF _. . . . . . 

. First user table in chain 

assigned to this port 




* 


C.IIMSG 


| 


| 


* 
















> 






Hard -wired — 
4800 Baud- 








-BCD 200 UT 

-TTY 

-ANSI 200 UT ^ 



PortO 



Port 1 



Port n 



'Treated as one contiguous field (bits "15" - 0) 
Bits "15" -0 = 0: dial-up line 

"15" - f : hard-wired: site n exists if bit n = 1 



6676 MULTIPLEXOR SUBTABLE 



59 


53 


47 


35 


23 


11 


C.IOTFL 

Count of 
Output Failures 


C.ILSDT 
Count of Lost 
Data Failures 






C.INPTS 

Number of 

Ports Serviced 


C.INB 


I1C 

First user table in chain 
assigned to this port 





6673/6674 MULTIPLEXOR SUBTABLE 



59 



53 



47 



35 



23 



W.IADN1 



C.INBUF 



First high speed 
user table address 



C.IGCON Def. of 

existing 274 Graphics 

Consoles'^ 



C.IHID 

First User ID 

Allocated 



C.IHCON 



S.16673-MUX is 6673 
S.IGRAPH - Graphics Legal 
Port 3 Defined 
Port 2 Defined 
Port 1 Defined 
i— Port Defined 
11 



tWord 2 present if S.IGRAPH = 1 
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LCC MULTIPLEXOR SUBTABLE 



59 



53 



47 



35 



29 



23 



C ILCST 

C.ILNLST FWA of CSM line 

i- CC I list for this LCC 

State 



First terminal 
ID allocated 



C.INRPS 

C.IRPLST 
No. of 
entries 



FWA of CSM 
response list entries 




= 8K LCC 

1 = 4K LCC 



C.INPTS 



Highest 
line # + 1 



Bit map of LCC lines downed by operator 
(Bit n=1 -» line n down) 



C.ILNST 

C.INBUF First user table in 

i-' ne chain assigned to this line 

State 



C.ISA2 



C.IIMSG 

Terminal type 
OJOI 



C.ISA1 



1 = Line downed 
by operator 



^ 



LineO 



Line 1 



n+2 



4 



Line n 



Terminal type: 



= No terminal 
2 = TTY 
22 = HSBT 



'Bit map of streams configured by HSBT operator on this line. 



Bits 






unused 








1 


stream 





configured 


(IDS output) 


2 


stream 


2 


configured 


(CRT) 


3 


stream 


8 


configured 


(CP1) 


4 


stream 


12 


configured 


(LP4) 


5 


stream 


10 


configured 


(LP3) 


6 


stream 


6 


configured 


(LP2) 


7 


stream 


4 


configured 


(LP1) 


8-15 


unused 








16 


stream 


1 


configured 


(IDS input) 


17 


stream 


3 


configured 


(KBD) 


18 


stream 


7 


configured 


(CR2) 


19 


stream 


5 


configured 


(CR1) 


20-23 


unused 
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59 



47 



DEVICE ACTIVITY TABLE ENTRY 
41 23 



11 



C.DATDST 

DST 
Ordinal 



C.DATEQP 

Eqp. 
Type 



CD AT ACT 



Activity 



(Reserved 
for Dual Access) 



Count 

Maintained 

By SPM 



(Reserved for Dual Access) 



TAPE STAGING TABLE 



59 CSTGMT 47 C.STGNT 35 



W.STGMAX 



W.STGFRE 



W.STGSAT 



W.STGUFD 



23 



11 



Number of 
MT Defined 



Number of 

MTON + 

Unassigned 



Number of MT 

Held by 
Satisfied Jobs 



Unfilled 
MT Demand 



Number of 
NT Defined 



Number of 

NTON + 

Unassigned 



Number of NT 

Held by 
Satisfied Jobs 



Unfilled 
NT Demand 



(Reserved) 



(Reserved) 



(Reserved) 



(Total) 



(Available) 



(Assigned) 



(Unfilled 
Demand) 
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59 



47 



ATTACHED PERMANENT FILE TABLE 
35 23 17 



C.PFD1 


C.PFD2 


C.PFD3 


C.PFD4 


C.PFQ* 
PFQ Address 




■ i i u i omi&i 






C.PFRBT 
First RBTA 


C.PFCNT2 
Count 2 


C.PFCNT 
Count 1 


C.PFCY 
Cycle No. 


C.PFLAG 
Flag Byte 



Word 1 



Word 2 



C.PFLAG 



11 10 9876543210 



(Reserved) 
(Reserved) 
System PF 
Obsolete FRBT 
Archive 
Utilities 



'i 



t 



Priority lockout 
Single write 
Single modify 
Exclusive access 
(Reserved) 
Interlock 



h lf =£ 0, PFQ Address - JDT Address of a job waiting for permanent file. 
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REQUEST STACK ENTRY 



59 



47 



38 35 



23 21 17 



NO FNT- 



FIRST 
WORD 



DIRECT - 
FNT- 



C.STPRBA 
RBT address 



RB number 



0000 



C.STPRBN 
RBT index 



RB 
byte 



EST ordinal 



FST Address 



C.STPPRU 

PRU number 



00 



J 



C.STO 



DB Rec. 
level 



11 



Order 
code 



1 = direct access for reading/writing M.S. label- 

Don't check buffer in FL I 



C.STCPU 



CTL. 
PT. 



Request 
stack 
chain link 



t 



Reserved) 



C.STPWC 



C.STPMS 



C.STPFW 



C.STFB 



C.STPLW 



PP 



SECOND 
WORD 



CM 



PP message 
byte address 



£ 



FWAof FETor 
reply word address 



FWA in PP core 



FWA in CM or 
count for skips 



£ 



LWA in PP core 



LWA+2 in CM 



Reply word = 1 
FET =0 



1 = High priority 



1 = File has ECS buffer 

Exact (don't read ahead) 

1 =No FET 

1 =No FNT 

Release (read or skip) or 

write EOF 



THIRD 
WORD 



(Supplied by SPM) 



EOI PRU 


FST address 


First RB number 
of RBR 


PRU/RB of 
this RBR 


RBR number 


Unit, 



00 


O.READ 


01 


O.RDSK 


02 


O.RCMPR 


03 


O.RDNS 


04 


O.WRT 


05 


O.WRTR 


06 


O.RMR 


07 




10 


O.RDP 


11 


O.RDPNP 


12 


O.SKF 


13 


O.SKB 


14 


O.WRP 


15 


O.WRPR 


16 


O.BPRU 


17 


O.RCHN 


20 


O.RCTNU 


24 


O.WCTNU 



STACK PROCESSOR ORDER CODES 



Read into central memory 

Readskp into central memory 

Read into central memory, drop first 3 CM words 

Read non-stop 

Write from central memory 

Write EOF/EOR from centra! memory 

Read multiple records to central memory 

Read into PPU memory 

Read into PPU, drop first 3 CM words 

Skip forward 

Skip backward 

Write from PPU memory 

Write EOF/EOR from PPU memory 

Backspace PRU 

Evict 

Read nonstop (comparable to tape READN) 

Write nonstop (comparable to tape WRITEN) 
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RECORD BLOCK RESERVATION TABLE 



C.RBRTPA 

ET -i 

T.RBR 


EST Ordinal 
Family Pack -j 

53 / 


47 


C.RBRUNT 
r-DST Ordinal 

41 


35 


23 






1 


W.RBRTPA 
W.RBRUNT 


jf 




f 


Unit 


Starting 
Device Address 


A 




C.RBRAL 

Allocation 

Style 


PRU/RB 


W.RBRLAV 


Length/2 
Bit Table 


RBR Bit Table 
Starting Address 


C.RBREST 
EST Ordinal 


C.RBRLAV 
Available RB's 


Usable RB's 



























































Any Additional Header Word Pairs 



T.RBRBIT 



Length 




ET Equipment type 

A Files without specified allocation style may go on this device 

B EST ordinal of first pack of pack family 
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DEVICE STATUS TABLE 



59 



47 



41 



35 



23 



17 14 11 



Channel Time 
Accounting Factor 


Driver 
Name 


Res. for 
Inst. 


Pointer to End 
of Chain 


Alt. 
Channel 


Pri. 
Channel 


DST 
Ordinal 


Head 1 
Position 


Head 2 
... Position 


Pointer to 
Start of Chain 


Res. for 
Inst. 




E 


Non-Zero if a 
.. PP is. Assigned 



E Equipment 

Driver Name A display code letter which is added to the characters 3S 
to form the overlay name 

Valid Letters Are 

P 6603-1 Disk 

Q 6638 Disk 

R 865 Drum 

S 854 Disk Pack 

T 6603-2 Disk 

U 814 Disk 

V 821 Disk 

W 841 Disk Pack 

Y 844 Disk Pack 
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DEVICE POOL TABLE 



T.DPT 

1 
2 
3 
4 
5 
6 
7 
8 



59 



Internal Information Passed Between 1EPand 1SP Each Time One Calls the Other 
47 35 23 11 



Y 


A, 


A2 


A3 


A 4 


A5 


A 6 


A 7 


A 8 


A9 


A 10 


A n 


A 12 


B1 


B2 


B 3 


B 4 


B5 


B 6 


B7 


B 8 


Bg 


B 10 


B 11 


B 12 


Ci 


c 2 


c 3 


c 4 


C5 


c 6 


C7 


c 8 


c 9 


C 10 


Cn 


C 12 


X 


z 


(Reserved) 



11 




5 


4 


3 


2 





Stack Request Ordinal 


ECS 
Bit 


PRI 
Bit 


Unit 
Number 



First Physical Sector 
for Latency Calculation 


Write 
Flag 


i 


Subpriority 



11 



Bypass Bit 



Standard First RB Number for 
Positioning Time Calculation 



11 



Ordinal of S.R. that may be Reissued 



Number of S.R. Waiting in Pool 



Limiting RB for Search in RBR 
During Service of Write Stack Request 
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SEQUENCER TABLE 




Nth JOB PAIR 
+ LSEQ-1 



A = Maximum number of job entries (L.SEQ-2/2) 
B = Number of jobs in Sequencer Table 
C = On/Off /Drop Flag 

0-Off 

1-0n 

2-Drop 
D = Table Interlock Flag 
E= Entry Full Flag 



F 


= Diagnostic F!a n Bits 




Bit = CT3 




Bit 1 =MY1 




Bit2 = CM6 




Bit3 = CU1 




Bit 4 = ALS 




Bit 5 = FST 




Bit 6 = EC2 




Bit 7 = ALX 




Bit8 = CEFAP 




Bit 9 = reserved 




Bit 10 = reserved 




Bit 1 1 = reserved 


G 


= Entry Drop Flag 


H 


= Interval 


I 


= Clock 


J 


= Job Name 


K 


= Last known FNT Address 
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T.RMS 59 



51 



ROTATING MASS STORAGE DIAGNOSTIC TABLE 
40 29 21 10 



E0 


EOL 


EOU 


E1 


E1L 


E1U 


E2 


E2L 


E2U 


E3 


E3L 


E3U 


E4 


E4L 


E4U 


E5 


E5L 


E5U 


E6 


E6L 


E6U 


E7 


E7L 


E7U 















EO, E1 , E2, etc. — EST ordinal of RMS device that was preallocated 
EOL, E1 L, etc. — Lower cylinder boundary of preallocated area 
EOU, E1U, etc. — Upper cylinder boundary of preallocated area 



IM-50 
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VSNBUF 



59 



47 



35 



23 



= used 

1 = free 



Line Reservation Bits 



(Bit 59 = line 1 
Bit 58 = line 2, etc.) 



C.VRNNXT 
Link to Next Line 




= if end of display 



C.VRNFNT 
FNT Address 



VSN hnformation 

to be 

Displayed 



= if not 
first entry 
for this job 



Line 1 



Line 2 



Line n 
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T.TAPES TABLE 





59 


47 


35 


29 


23 


17 


11 




EST Ordinal 
(Binary) 


FNT Address 


Control Point 
Number 


MT or NT 
(Display Code) 


EST Ordinal 
(Display Code) 


W.TFLIM1 


Label Name 




Label Name 


Position Number 




Edition Number 


Retention Cycle 


Creation Date 


W.TREEL 


Multi-File Name 


Reel Number 


W.TFLGS 


C.TFLGS 

Flag Bits 




W.TVRN 


Volume Serial Number of Current Reel 


Channel Byte Count 
of Previous Record 


W.TVRN1 


Volume Serial Number of First Reel 


PRU Number of Last PRU 
That Got Noise Warning 1 



C.TFLGS - Job-Oriented Flag Bits 



59 58 57 56 55 54 53 52 51 50 49 48 



GO 



S.TTFGO- Go bit 
S.TTFRC— Recheckbit 

(Reserved) 
S.TTFST — Stop Staging 
(Reserved) 
(Reserved) 



IT 



RC 



ST 



VP 



MP 



LC 



EC 



t 



Label expiration checked — S.TTFEC 
Label checked — S.TTFLC 
Multi-file position bit — S.TTFMP 
VSN-printed bit -S.TTFVP 
(Reserved) 
(Reserved) 



C.TFLGS+1 - Unit-Oriented Flag Bits 



47 46 45 44 43 42 41 40 39 38 37 36 



VT 



S.TTFVT- VSN read from tape 
S.TTFOV- Operator-supplied VSN 
S.TTFSC — Scratch 
S.TTFRD- Ready 

(Reserved) 

(Reserved) 



br- 



OV 



SC 



RD 



EL 



BL 



LB 



FS 



Rl 



WN 



tJ 



Unexpired label w/ring— warning — S.TTFWN 

Ring in bit -S.TTFRI 

Flash save bit — S.TTFFS 

Labeled -S.TTFLB 

Blank labeled -S.TTFBL 

Expired label - S.TTFEL 
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REMOVABLE PACK TABLE ENTRY (RPT) 



C.RPTEST 
C.RPTVID 



59 



C.RPTFST C.RPTCP 

47 35 



C.RPTPKN 
23 14 



EST 
Ordinal 
(Binary) 


FST 
Address 


Control 

Point 

Number 


A M 
. or _ 
A P 

(Display Code) 


EST 

Ordinal 

(Display Code) 


Visual Identifier (VI D) 
of Current Pack 


Pack Number of 
Current Pack 



MAILBOX 



59 



47 



35 



17 



LE.MAIL 



Entry Count 


Flags for 
M.DFM. . 




Job Descriptor 
Address 




-j.CFOBit 

Message 






i 






Broadcast Box 
(Deadstart Recovery Message) 



L.MAI L 



T 



LE.MAIL 
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DAYFILE FET AND BUFFER AREA 



59 



47 



35 



23 



11 



CPO 
FET 



CP1 
FET 



CPn 
FET 

CERFILE 
FET 



Index 
I Nq Pointer) 



Index 
IN., Pointer) 



Index 



Index 
( I N c Pointer) 



Size 
(LIMIT -FIRST ) 



Size 
(LIMIT 1 -FIRST 1 ) 



(FIRST -T.DFB) 



Remaining Number 
of Preallocated PRUs 



Size 
(LIMIT n -FIRST n ) 



(FIRST r T.DFB) 



(FIRST n -T.DFB) 



(Reserved) 



MTR Code Word 



(Reserved) 



(Reserved) 



(Reserved) 



Size 
(LIMIT C -FIRST C ) 



(FIRST C -T.DFB) 



Remaining Number 
of Preallocated PRUs 



MTR Code Word 



System Dayfile Buffer 



Control Point 1 Dayfile Buffer 



Control Point n Dayfile Buffer 



CE Error File Buffer 



T.DFB 



FIRST 







FIRST 



FIRST 2 



FIRST. 
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PERIPHERAL JOB TABLE 



PP Input Register Image 



W.PPMES4 Image 



One 
Entry 



W.PPMES5 Image 



W.PPMES6 Image 
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T.SCHPT 



59 



SCHEDULER PERFORMANCE TABLE (SCHPT) s.PTNSTD 

S.PTINIT 

S.PTSTOP 

S.PUBNCH 

S.PTFJOB 

29 ' 5 



si 



FLAGS 



Elapsed Time 



CPU Idle Time 



User Mode System Program Execution Time 



PPU Idle Time 



Number of Storage Moves 



Number of Words Moved 



Number of Swap-outs/Roll-outs 



Number of Words/100B Swapped or Rolled Out 



Time to Get All Quiet 
(seconds * 4096) 



Number of INTERCOM 
Commands Processed 



Time to Swapout Jobs 
(seconds * 4096) 



Number of Batch Jobs 
Processed 



Number of CPMTR Calls 



Reserved for Storage of Intermediate Times 



S.PTNSTD — Manual/benchmark option selected 

S.PTINIT - Initialization of TSPT 

S.PTSTOP — Stop data gathering 

S.PUBNCH — Benchmark option selected 

S.PTFJOB — First Job execution started 
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JOB CONTROL AREA 



59 



47 



35 



23 



17 



11 



Input 
Queue 
Entry 



Class 1 

(No 

Non-allocatable 

Devices) 



Class 2 

(Non-allocatable 
Devices) 



Class 3 

(Interactive 
Jobs) 



Class 4 

(Multi-user 
Jobs) 



Class 5 

(Express 
Jobs) 



C.JCMXB 

Max # Class 

1 Batch 


C.JCMTB 

Max # Class 

2 Batch 


C.JCCLK 
1 IB Flag 


C.JCQP 
Quantum 
Priority 


C.JCBQ 

Quantum 

Value 


C.JCCNB 

Current # 

Class 1 Batch 


C.JCCTB 

Current # 

Class 2 Batch 


C.JCEMC 

# Empty FNT 

Entry 


C.JCNTJ 
a # Ready-to- 
run Tape Jobs 


C.JCNJI 

b# Ready-to-run 

Non-tape Jobs 


C.JCMIN 

Minimum 

Class Priority 


C.JCMAX 

Maximum 

Class Priority 


C.JCAR 
Aging Rate 


C.JCQP 

Quantum 

Priority 


C.JCBQ 

Quantum 

Value 




C.JCFRST 

Address of First 

JDT in Chain 


C.JCMIN 


C.JCMAX 


C.JCAR 


Q JC n P 






C.JCFRST 


C.JCMIN 


C.JCMAX 


C.JCAR 


C.JCQP 


C.JCBQ 




C.JCFRST 


C.JCMIN 


C.JCMAX 


C.JCAR 


C.JCQP 


C.JCBQ 




C.JCFRST 


C.JCMIN 


C.JCMAX 


C.JCAR 


C.JCQP 


C.JCBQ 




C.JCFRST 



a = 1 Fixed priority tape jobs in Input Queue, 
b = 1 Fixed priority non-tape jobs in Input Queue. 



JOB DESCRIPTOR TABLE ENTRY 



59 



47 



35 



W.JDNAM 
W.JDLNK 

W.JDSWP 

W.JDDSD 

W.JDMGR 

W.JDINT 



Job Name 



C.JDEQC 
Equipment Code 



C.JDFRB 
First RBT 



First subpage address of ECS swap file 



C.JDCPN 
CP# Priority 



C.JDJST 
Job St. Class 



C.JDID 

INTERCOM 

User ID 



C.JDORD 
J.D. Ordinal 



C.JDFLG 
Flags 



C.JDTL 
Time Limit 



C.JDTIN 
PFM C.JDPFM 
Bits 



C.JDTIN 
Time into Chain 
or APF Pointer 



C.JDCPT 
CPU Time 



C.JDIUTA 



23 



17 



11 



C.JDLNK 



Link to Next JDT 
in Chain 



C.JDFL 
FL/100B 



C.JDOPF 
Operator Flags 



C.JDBP 
Base Priority 



User Table 
Address 



C.JDPFL 
Positive FL 



C.JDORG 
SSW Origin 



C.JDRU 
PP/CP Time 



CJDLPFL 

Length of 

Positive FL/100B 
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NOTES: JOB DESCRIPTOR TABLE 



WJDSWP 




CJDFLG 


Bit 





unused 




1 


unused 




2 


unused 




3 


S.JDNFNT 




4 


SJDROLL 




5 


S.JDSKFL 




6 


S.JDECS 




7 


SJDNJ 




8 


S.JDLGO 




9 


S.JDLGI 




10 


S.JDNRR 




11 


S.JDBCB 


W.JDDSD 




C.JDOPF 


Bits 


0-2 


Error codes: 




3 


S.JDLOK 




4 


S.JDNS 




5 


S.JDGO 




6 


S.JDEXP 




9-11 



C.JDORG 


Bits 


6-11 
0-5: 


Sense switches 




5 


S.JDINT 




4 


S.JDMUJ 




3 


S.JDGR 




2 


S.JDRT 



Set if 1AJ should not search FNT table 

Set if job cannot be swapped out 

Set if FL is to be skipped on swap file 

Set if swap file is on ECS 

Set to indicate control cards must be read from INTERCOM area 

Set if swap file must not be generated for this INTERCOM job 

Set if job is a LOGIN command 

Set if job cannot be rerun 

Set if recovery took place 



Contains operator flags: 

F.JDKILL, F.JDDROP, F.JDRRUN, FJDRRNP 

If job must not be brought to a control point 

If job must not be swapped/rolled out when at control point 

If operator types GO 

If job is to be placed in express queue 



Set for standard INTERCOM job 
Set for multi-user job 
Set for Graphics job 
Set for real time job 



WJ] 


DMGR 




C.JDJST: 




Bits 


48-53: 


Contain job class 






01 


F.JDBAT 






02 


F.JDBNA 






03 


F.JDINT 






04 


F.JDMUJ 






05 


F.JDEXP 



For batch job with no non-allocatable device requirements 

For batch job with non-allocatable device requirements 

For standard INTERCOM job 

For multi-user job 

If express handling requested for this job 
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NOTES: JOB DESCRIPTOR TABLE (CONT'D) 



Bits 54-59: Describe job status 

OX F.JDLMB 

IX F.JDWCM 

2X F.JDWPF 

3X F.JDWDA 

4X F.JDWOA 

5X F.JDWIA 

XI F.JDSWI 

X2 F.JDACT 

X3 F.JDWCC 



Waiting for entry in scheduling structure 

Waiting for CM 

Waiting for permanent file availability 

Waiting for device assignment 

Waiting for operator action 

Waiting for INTERCOM action 

Waiting for swap in 

Currently executing at control point 

Waiting for scheduler action 



C.JDPFM 

Bit 



42 
43 
44 
45 
46 
47 



Read permission desired 
Extend permission desired 
Modify permission desired 
Control permission desired 
Exclusive access desired 
Purge bit 



60307400 A 



II- 1-59 



CEFAP BUFFER AREA 



T.BCFAP 



CEM-Working Flag 



Buffers 



Buffer for Error Codes 0-3 



X0 = ECS FWA of Transfer 



A0 = CM FWA of Transfer 



Bj+K = Length of Transfer 



Exact ECS Address of Transfer 



CEFAP Error Code (Unweighted) 



Pointer to Next Buffer (0 = End of Chain) 



Buffer for Error Codes 20-27 



ECS FWA of Transfer (or Unused) 



Port Channel 



Length of Transfer (or Unused) 



PPNT Address + 1 



CEFAP Error Code 



Pointer to Next Buffer (0 = End of Chain) 



Error Code (Unweighted) 

= Write Abort 

1 = Read Parity Error 

2 = Recovered Read Parity 

3 = Interlock Register Abort 

20 = Unclassified DDP Error (DDP Reply = 0) 

21 = DDP Found ECS Abort (DDP Reply = 1) 

22 = DDP Channel Drops Active 

23 = DDP Channel Stays Full 

24 = DDP Found ECS Read Parity Error (DDP Reply = 4) 

25 = Unclassified DDP Error (DDP Reply = 5) 

26 = DDP Unable to Connect 

27 = DDP Logically OFF 
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EMPTY PAGE STACK 



T.EPAGE 



59 



23 



FWA of ECS Page 



FWA of ECS Page 



L.bCSI K 



(A6 + B5 in CP.MTR exchange 
package points to next entry) 



59 



53 



35 



23 



17 



T.ECSPRM 





C.ECTL 
T.ECTL 


C.BCFAPL 
L.BCFAPA 




C.BCFAP 
T.BCFAP+1 



W.BCFAP 
W.ECTL 
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T.SUBPG 



59 



47 



SUBPAGE BUFFER 

35 23 17 



Subpage Type FWA of this System Page 


Page Address of Current 
Data if Input Buffer 


File Name 


Number of Available Words 
in Page if Output Buffer 




JDT Ordinal 


Maximum Buffer Length 


Record Descriptors 



59 55 



51 



41 



RECORD DESCRIPTORS 

23 



id= 
10XY 


Level 




Data Length 


Data Address 



X = 1 Beginning of a new data page 

Y = 1 Transmission RMS parity error flag 



23 



X = 1 Beginning of a new data page 

Y = 1 Transmission RMS parity error flag 



23 



Record 



id= 
11XY 




Data Length 


Data Address 



Split Record 



id= 
0100 




Next Subpage Address 



Forward Link 



23 



id= 
0110 




Previous Subpage Address 



Backward Link 



47 



23 



id= 
OOOX 




FWA of Available Space 
in Data Page 


Current Buffer Length 



X = End of ECS buffer 

X = 1 End of Information on disk 

41 



23 



t Used only for the library 



End of 
Descriptor List 



id= 
0010 




Index of First Entry 
in Preallocated Space t 


Address of Preallocated 
Space in ECS t 



Beginning of 
Descriptor List 



II- 1-62 



60307400 A 



NOTES: SUBPAGE BUFFER 
Subpage Type (bits 59-48) 
Subpage Position (bits 49-48) 

00 = continuation subpage 

01 = first subpage in a file 
10 = last subpage 



Data Type 



Bit 



50 
51 

52 
53 
54 
55 
56 
57 
58 
59 



release data as read 

(reserved) 

I/O buffer (with bit 50) 

library file (ZZZZZ06) 

ECS resident file 

swap file 

auxiliary file for ECS resident random file 

index for random ECS file 

(reserved) 

(reserved) 



id (bits 59-56) 



0XXX = system descriptor 

0000 = end of list; continued on disc 

0001 = end of list; EOI on file 
0010 = beginning of list 

0100 = forward link pointer 

0110 = backward link pointer 
1XXX = data descriptor 

10XX = full record descriptor 

11 XX = split record descriptor (full record described by this and next descriptor) 

1X0X = current data page 

1X1X = new data page 

1XX0 = no parity error 

1XX1 = parity error in record 
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T.ECTL 



59 



Buffer 
In Use 
Flag 



T.EBUF 



% 



2 Such 
Entries 
For Each ( 
Buffered \ 
Device 



ECS BUFFER FOR RMS-ECS TRANSFER 



41 



23 



17 



Total Numbers of 
Buffers (2*IP.BDCT) 



FWAof 
Descriptor Area 



FWAof 
Descriptor Area 



Number of 
Available Buffers 



FWA of Buffer 



FWA of Buffer 







Record 
Level 







Word 
Count 



Descriptor Area 

1 Word for Each PRU in Buffer 



Buffer 



64 10 Words/PR U 



X = No Parity Error 

X = 4000B Uncorrectable Disk Read Parity Error 



2 Entries 
For Each 
Buffered 
Device 



IP.SBLG 



IP.SBLG 
PRUs 
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59 



T.LIB 



CMR DIRECTORY 

41 35 23 17 



Library Name Table (LNT) 
(5 Words per Entry) 



LWA+1 of PP 
Program Bodies 



PP Program Name Table (PPNT) 
(2 Words per Program) 



PP Program Bodies 



CM Resident Libraries 



LWA+1 of LNT 



LWA+1 of PPNT 



LIBRARY NAME TABLE ENTRY 



Entry Point 
Name Table 

External 
Reference Table 

Program 
Number Table 

Program 
Name Table 









CM Library 1 






ECS Library 1 






EDITEXTEND/ 






SYSTEM Library -! 






New Library — 








Modified Library — 








Use Disk Address— j 




59 




35 


14 3 


Library Name 






Address of ECS 


CM FWA of 


Disk Address of 




Descriptor 


Library 


Library 




Address of ECS 


CM FWA of 


Disk Address of 




Descriptor 


Library 


Library 




Address of ECS 


CM FWA of 


Disk Address of 




Descriptor 


Library 


Library 




Address of ECS 


CM FWA of 


Disk Address of 




Descriptor 


Library 


Library 
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PP PROGRAM NAME TABLE ENTRY 



59 



PP Program 
Name 



ECS Address 



41 38 35 



EDITEXTEND/SYSTEM Record' 
ECS Resident 
CM Resident 
Control Card Callable — i 



23 



17 14 



Length in 
CM Words 



CM Address 



Access 
Level 



Short Disk Address 
if in CM or ECS 



Long Disk Address if not in CM or ECS 



59 



47 



Length 
of PNT 



CM RESIDENT LIBRARY FORMAT 

35 17 



Length 
of PNUT 



Length of 
ERT 



Entry Point Name Table (EPNT) 
(1 Word per Entry Point) 

External Reference Table (ERT) 
(1 Byte per External Reference) 



Program Number Table (PNUT) 
(1 Byte per Entry Point) 



Program Name Table (PNT) 
(2 Words per Program) 



Library Program Bodies 



11 



Length of 
EPNT 
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EPNT ENTRY FORMAT 



59 



17 14 



Entry Point Name 



Access 
Level 



Control Card Callable— 1 

000 = Relocatable 

001 = Overlay (50 Table) 

010 = Overlay (51 Table) 

011 = Overlay (53 Table) 



ERT ENTRY FORMAT 



Entry Point 
Number + 1 


Entry Point 
Number + 1 


Entry Point 
Number + 1 


Entry Point 
Number + 1 


Entry Point 
Number + 1 or 
Continuation 



PNUT ENTRY FORMAT 



Parcel 

Relative 
PNT Address 


Parcel 1 

Relative 

PNT Address 


Parcel 2 


Parcel 3 


Parcel 4 


Parcel 5 


Parcel 6 






Parcel n 



PNT ENTRY FORMAT 



59 



35 



00 = Disk Address 

01 = CM Address 
10= ECS Address 

17 14 



1 = Program on 

EDITEXTEND 



i — EFL Override Allowed 
10 



Program Name 



FL Required 
Divided by 100B 



ECS or CM Address 



Length of 
Binary Program 



Disk Address 
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59 



53 



47 



INTERCOM POINTER AREA 
35 23 



17 



% 



W.IEMBF 



W.IEMBI 



W.IUSER 



W.IUSEI 



W.IUSEW 



W.IUSWI 



W.IMES 



W.IOUTI 



W.IINPI 



W.IUSTI 



W.IMUJ 



W.I1BR 



W.IT76 



W.IDSI 



W.IHSMT 



Terminal/Central Site 



Communication Area 



C.INBUF 



i Small buffer empty 
| chain pointer 



C.INBUF 



I Small buffer empty 
chain interlock table pointer 



C.INBUF 



[LS user table 
|chain pointer 



C.INBUF 



iLS user table 
[interlock table pointer 



C.IUWEST 
EST | Port 

Ord. 



C.IUWSTA 

Station 

Address 



C.INBUF 



Est 
prd 



User table request word 
interlock table pointer 



Port 



Site 
Address 



C.INBUF 



IW.IOTPUT interlock table 
Ipointer (LS) 



3.INBUF 



iW.IINPUT interlock table 
[pointer (LS) 



C.INBUF 



.W.ITNPUT/W.ITOPUT 
interlock table pointer (LS) 



C.INBUF 



iMUJ table chain 
Ipointer 



C.IDROP 



C.IPTIME 

Delay counter small 

buffer release code 



C.IINCT 
Interlock table 
length=N.1M1+2 



C.INUSER 
Number of 
entries in chain 



C.IINCT 



N.1M1+2 



E.IUWSTS 

1 = 1 CI has assigned 

user table 



C.ITNCT 



N.1M1+2 



HS/LS user 
table chain index 



C.IINCT 



N.1M1+2 



C.IINCT 



N.1M1+2 



C.IINCT 



N.1M1+2 



C.INMUJ 
Current number 
of MUJs 



C.ICTR 

Counter for "no CM 

obtained" message 



C.IITYPE 
Interlock type 
1 



C.IITYPE 



1 



C.IUWUSR 



I Address of new 
user table 



C.IMM 
Time in 
minutes 



S.IT76-lnterlock bit for INTERCOM Request 

Area in 6000 Station Control Point Area 



C.INBUF 



| Data stream interlock 
table pointer (HS/LCC) 



C.INBUF 



[Large buffer empty 
| chain pointer 



C.IINCT 
N.1WB+N.1ZZ+2 



C.IITYPE 



1 



C.IITYPE 



1 



C.IITYPE 



1 



C.IITYPE 



1 



C.IQPINT 
1QP interlock 



C.ITOT 

Number of times 
message written 



C.IT76 



C.IITYPE 
3 



53 



lccIhs Ils 

Drop 
complete 



LCC |HS 

Drop 

in progress 



ILS 
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INTERCOM POINTER AREA 





59 


53 47 


35 


23 17 


11 


W.IHSMTI 


C.INBUF 


Large buffer empty chain 
interlock table pointer 


C.IINCT 
N.1WB+ 
N.1ZZ+1 




C.IITYPE 
2 


W.IHUSR 


C.INBUF 


HS user table 
chain pointer 


C.INUSER 
Number of entries 
in chain 




W.ILCUSR 


C.INBUF 


LCC user table 
chain pointer 


C.INUSER 
Number of entries 
in chain 




W.IHUSRI 


C.INBUF 


iHS/LCC user table 
interlock table pointer 


C.IINCT 
N.1WB+ 
N.1ZZ+1 




C.IITYPE 
4 


W.IHOUTI 


C.INBUF 


iW.IOTPUT interlock table 
1 pointer (HS/LCC) 


C.IINCT 
N.1WB+ 
N.1ZZ+1 




C.IITYPE 
4 


W.IHINPI 


C.INBUF 


| W.I INPUT interlock table 
| pointer (HS/LCC) 


C.IINCT 
N.1WB+ 
N.1ZZ+1 




C.IITYPE 
4 


W.IHTI 


C.INBUF 


W.ITNPUT/W.ITOPUT 
i interlock table pointer 
1 (HS/LCC) 


C.IINCT 
N.1WB+ 
N.1ZZ+1 




C.IITYPE 
4 


W.ISTATI 


C.INBUF 


Data Stream 
iStatus word interlock 
|table pointer (HS/LCC) 


C.IINCT 
N.1WB+ 
N.1ZZ+1 




C.IITYPE 
4 


W.IEMBAI 


C.INBUF 


Small buffer empty 
ichain auxiliary 
[interlock table pointer 


C.IINCT 
N.1WB+ 
N.1ZZ+1 




C.IITYPE 
2 


W.IUSWAI 


C.INBUF 


user tauic request 
[word auxiliary 
[interlock table pointer 


r> i iMfT 

N.1WB+ 
N.1ZZ+1 




q | [TYPE 
2 


W.IGUTC 


C.INBUF 


[Graphics user table 
1 chain pointer 




W.IGRES 


C.INBUF 


j Graphics console 

1 reservation table pointer 


C.IGEJC 
Ports for which 
GEJ Called 


C.IGEJ 

No. of executing 

Copies of GEJ 


C.IGDSF 
GEJ Deadstart 
Recovery Flag 


W.IGSI 


C.INBUF 


i Graphics interlock word 
| pointer 


C.IINCT 
1 




C.IITYPE 
1 












<si 



274 IGS 
Console 
Reservation 
Table 



Interlock Area 



^r 



C.IGWT1 



t 



Address user table 
first job in queue 



C.IGWT2 C.IGUTA 

Address user table 
second queued job 



Address user table 
attached job 



S.IGSNM-console in SIGNON mode 
S.IGAV -console available in configuration 



£ 



%■ 



N.IGCON-1 
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INTERLOCK TABLE FORMATS 



IP.1M1 



IP.1WB 



IP.1ZZ 



IP.1WB 



IP.1ZZ 



IP.1WB 



IP.1ZZ 



Type 1 interlock table format 

59 



11 



Indicator 



Indicator 



Indicator 



Indicator 



Type 2 interlock table format 

59 



Indicator = any non-zero value 
11 





Indicator 




Indicator 




Indicator 




Indicator 


Indicator 



System & 1 B R word 



! Low-speed 
driver words 

High-speed & 
LCC driver word 



System & 1BR word 



High-speed 
driver words 



LCC driver 
words 



Type 3 interlock table format 

59 



Indicator = any non-zero value 
17 





Indicator 




Indicator 




Indicator 




Indicator 




Indicator 




Indicator 



Type 4 interlock table format 
59 



Indicator = 18 bit CM address of data stream word pair 
(in auxiliary high-speed user table) 



17 



Indicator 



Indicator 



Indicator 



Indicator 



Indicator 



System word 



High-speed 
driver words 



LCC driver 
words 

BR word 



System & 1BR word 



High-speed 
driver words 



LCC driver 
words 



Indicator = 18 bit CM address of user table 
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MULTI-USER JOB TABLE 



59 



47 



35 



23 



11 



W.IUSTA 



W.IMNAME 



W.IMQP 



W.IUFST 



W.IMDES 



W.IMTIN 



W.IMTOUT 



^ 



C.INBUF 

Address of Next MUJ Table 



C.IUSID 
MUJ ID 



C.ITIME 

1CI Timer for 

Swaps 



MUJ Name 



C.IMUC 
Total Number 
of MUJ Users 



C.IMAC 
Activity Count 



C.IUJDA 



1UJJDT Address 



C.IMED 
EDITOR Flag 



C.IMSID 
Swapin Delay 



C.IMTIP 



Address of TERM IN 



C.IMTOP 



Address of TERMOUT 



C.IMSTAT 
1UJ Status Byte 



C.IMSIF 
Swapin Flag 



C.IMSOD 
Swapout Delay 



C.IMTIL 
Length of 
TERMIN 



C.IMTOL 

Length of 

TERMOUT 



C.IMFL 
MUJ FL/100B 



C.IBSTAT 
0005 



C.IMSOF 
Swapout Flag 



C.IUFILE 



C.IMTHDR 

I Address of 

TERMIN/TERMOUT Header 



C.IMTHDR 

I Address of 

TERMIN/TERMOUT Header 



(Reserved for CDC) 



(Reserved for Installation) 



15 
16 
17 



■End of 
Execution 



W.IMQP (2) 



C.IMSTAT 



0001 = Waiting for I/O 
0003 = MUJ Active 
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HIGH SPEED USER TABLE 



59 



47 



35 



23 



11 



W.IUSTA 



W.IFLGS 
W.IJBCRD 



C.INBUF 
Address of Next HS User Table 



W.IINPUT 



| W.IOTPUT 



W.ISDOT 



W.ISDIN 



W.IUEQP 



W.IUSTAT 



W.IUDRV2 



C.IDVRT 
C.IOVFL 
C.IMESCI 



C.IUSID 
Terminal ID 



C.IJBCRD 

Pointer to Job Card 



C.IDINOT 



Incoming 
lessage OUT Pointer 



C.IDOTOT 

Outgoing 

Message OUT Pointer 



C.IDINOT 

I Special 

Directives OUT Pointer 



C.IUEST/CIUPORT 



W.IINS 



EST 
Ord 



Port 
Number 



C.IGSON 



C.IDINJN 



Incoming 
Message IN Pointer 



C.IDOTIN 



Outgoing 
Message IN Pointer 



C.IDININ 

Special 
Directives IN Pointer 



C.IDAUT 



Address 
of Aux. User Table 



1WB Temporary Storage 



C.ISYNC 

Number of 

Synch Errors 



C.ICYCL 
No. of Cyclic 
Code Errors 



C.IIO 
Number of 
I/O Errors 



C.IBSTAT 
10 



C.ICADS 

Number of 

Data Streams 



C.IMXL 
Max. Buffer Size 



C.IDSEQ 

No. of Sequence 

Bit Errors 



C.IUMSG 
10 



C.IUSTAT 
Terminal Status 



C.ITOTRX 

Number of 

Retransmissions 



(Reserved for CDC) 



10 



11 



12 



13 



[Reserved for Installation) 



16 
17 
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AUXILIARY HIGH SPEED USER TABLE 



59 



47 



35 



23 



11 



W.IUSTA 



W.ICSTAT 



W.IDS1X 



C.IOST 



W.ICDIR 



S.IDSO- 
Message 
Waiting- 

S.IDSI- 
Accept 
Message • 



C.IPST 



54 



321 



C.ISST 



43 



2 1 



C.ITST 



5432 



C.IBSTAT 
6 



C.IQST 



Can Receive 

Input or Data 

Available 



Special 
Directive 
Received 



Cancel 

Special 

Directive 

or Release 

Data Stream 



Data Stream Word Pairs 



Latest Directive Block Received from Terminal 



54321 



Clear 
Bit in 
C.IPST 



15 



16 



17 



59 



47 



INPUT DATA STREAM WORD PAIR 
35 23 



11 



C.IDINOT 



Data 
Stream OUT Pointer 



C.IFDC 
4 



C.IFNT 
FNT Address 



C.IDININ 



Data 
Stream IN Pointer 



C.IFSTAT 



Job Card Error -S.IJCER 
I — Job Card -S.IJCIP 
EOF -SJXEOF 



C.IMXL 

Maximum Block 
Length 
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PRINT OUTPUT DATA STREAM WORD PAIR 



59 



47 



C.IXOTIN 



Data 
Stream IN Pointer 



C.IFDC 
6 4 



35 



23 



11 



C.IPRI 
File Priority 



C.IFNT 
FNT Address 



C.IXOTOT 



Data 
Stream OUT Pointer 



C.IFSTAT 



■Send End-of-Line - S.IXEOL 
■ (Unused) 

■EOI Read-S.IXEOI 

I — Suspended -S.ISPND 

i- Diverted - S. I DVRT 



C.IMXL 

Maximum Block 
Length 



PUNCH OUTPUT DATA STREAM WORD PAIR 



59 



47 



35 



23 



11 



C.IXOTIN 



Data 
Stream IN Pointer 



C.IFDC 

1 



t 



1 



C.IPRI 
File Priority 



C.IFNT 
FNT Address 



C.IXOTOT 



Data 
Stream OUT Pointer 



C.IFSTAT 



■Send End-of-Line - S.IXEOL 
•Punch Laced Card -S.IPNCH 
■EOI Read-S.IXEOI 
■Suspended -S.ISPND 
-Diverted -S.I DVRT 



C.IMXL 

Maximum Block 
Length 



Hollerith Data -S.I HP 



I — Free Form Binary Data - S.IDSDEF 
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NOTES: HIGH SPEED USER TABLE 



W.IFLGS 




CIDVRT/C 


Bits 


0-5 






6 


S.IMAX 




7 


S.IOVFL 




8-11 




W.IUSTAT 




CIUSTAT 


Bits 





S.IXDRP 




1 


S.IXACK 




2 


S.IXUP 




3 


S.IXOFF 




4 


S.IXUTBY 




5-11 




W.IUEQP 




C.IGSON 


Bits 


0-5 






6 


S.IGRMUX 




7 


S.IGSON 




8-11 





10 = divert punch output 

40 = divert print output 

50 = divert print and punch output 

Maximum message buffers assigned or no available empty buffers 

Generated message lost; no available empty buffer 

(Unused) 



Terminal shut down 

Drop request acknowledgement 

Start of terminal activity 

Terminal terminated communication 

Release to empty chain 

(Unused) 



Graphics output stream number 
Graphics MUX 
Graphics streams defined 
(Unused) 
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II- 1-75 



LOW SPEED USER TABLE 



W.IUSTA 



W.IUCMD 



W.IUMUJ 



W.IUFST 



W.I INPUT 



W.IOTPUT 



W.ITNPUT 



W.ITOPUT 



W.IUEQP 



W.IUDRV1 



W.IUDRV2 



W.IUAFT 



W.IUAPP 



W.IUACP 
W.IUIUP 



W.IUATIM 



W.IINS 



59 



53 



47 



35 



29 



23 



11 



C.INBUF 

I Address of Next LS User Table 



C.ICMD 
Batch Command 



C.IUMJS 
MUJ Status 



C.IPARAM 
Parameter 



C.IUSID 
User ID 



C.ITIME 
Timer 



C.IJBCRD 

Pointer to Job Card 



C.IUMJP 



MUJ Table Pointer 



C.IUJDA 



JDT Address 



C.IUEQC 

Swap File 

Equipment Code 



C.IUFRB 
Swap File First 
RBT Word Pair 



C.IDINOT 



Input Data OUT Pointer 



C.IDOTOT 



00 



Output Data OUT Pointer 



C.IDINOT 

No. 
Buffers 



Transmission Input 
Data OUT Pointer 



C.IDOTOT 
00 



Transmission Output 
Data OUT Pointer 



S.IUEST/S.IUPORT 

EST , 

Ord. Port 



C.IUDRET 
Return Address 



C.IUSITE 
Site Address 



C.IUDCNT 
No. of Spaces Left 



C.IUFL 

Swap File 

Length/1 00B 



C.IUPFL 
Positive FL/100B 



C.IDININ 
00 



Input Data IN Pointer 



C.IDOTIN 



Output 
Data IN Pointer 



C.IDININ 
00 



Transmission Input 
Data IN Pointer 



C.IDOTIN 
Flags 



Transmission Output 
Data IN Pointer 



C.IIFNT 
FNT Pointer 



C.IUDSTA 
Station Address 



C.IOFNT 
FNT Pointer 



C.IUDECD 
| Retry | e-Code 



C.IBSTAT 
Flags 



0001 



C.IUSTAT 
Flags 



C.IUMORD 

MUJ Ordinal 



C.IUFILE 



File Count 
and Flags 



C.ISIZLN 
Page Size 



C.ISIZLN 
Line Length 



C.IFSTAT 
Status 



C.IFSTAT 
Status 



C.IUMSG 
Message 
Ordinal 



C.IDSTAT 
C.IUDCCD 



Driver Parameters 



Partially Transmitted Word of Data 



Current Data Word Being Assembled/Disassembled 



C.ICUFL 
Current FL/100B 



C.IUACS 
Access Level 



C.IMXFL 
Max. FL/100B 



C.IUFLGS 
User Table Flags 



C.IUCCA/C.IUIUP 



Flags 



Control Card Buffer 



C.ICUTL 

Current 

Time Limit 



C.IMXTL 
Maximum 
Time Limit 



C.IMXFI 
Maximum Files 



PP Time as Number of Seconds * 4096 



CP Time as Number of Seconds * 4096 



Date of Login 
Y Y D D D 



Time of Login 
H H M M 



Reserved for Installations or Last Command for DSD Q-Display 



-Executing 
Command 



-Command or 
Transmission 

Mode or 

Attached to 

MUJ 



10 



V 

11 



12 



13 



14 



15 



16 



17 



6671 CRT 

6676 TTY 
-6671 CRT 

-6676 TTY 
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NOTES: LOW SPEED USER TABLE 



W.IUSTA(0) 




CIBSTAT 




Bit 


4 


S.IDISC 


Terminal Disconnected 




5-6 


S.ILOGO 


00 = user logged out 

01 = user logged in 

10 = auto-logout requested 

11 = auto-logout in progress 




7-8 


S.ISTATE 


00 = transmission state 

01 = waiting input 

10 = waiting output 

11 = active or assigned to control point 




9 


S.IRDIS 


Request disconnect 




10 


S.IUTAPE 


Request paper tape reading 




11 


S.IABRT 


Abort request 



W.IUCMD(1) C.ICMD 

No command 

1 REW 

2 BSP,nnn 

3 CONTINUE 

4 END,CR 

5 END,LP 

6 GO 

7 DIVERT 

10 READ 

1 1 SUSPEND 

12 REP,n 

13 No command - MES active 

14 No command - attached to MUJ 

15 No command - flag for 1CI 



CIPARAM 



PRU count to backspace 



User ID 
FNT address 



Parameter for 1CI overlay 



nf,jLU<u.viu(i) 



Bit 



0-5 
6 

7 



9 

10 

11 



ciuaiAi 

Not used 
Not used 
Not used 
Not used 
S.IMPORT 
S.ICTAPE 



Used by IDS to determine type of H display wanted 



Import on flag 
Paper tape on flag 



W.IUMUJ(2) 

Bit 

1 
2 

3-6 
7 
8 
9 
10 
11 



C.IUMJS 

S.IMNUS 
S.IMRUN 
S.IMDIS 

S.IMBKS 

S.IMLGS 

S.IMWO 

S.IMWI 

S.IMUJ 



New user 

RUN command in progress 

Reconnected after disconnect 

(Unused) 

Break sent 

Logout sent 

Waiting for output to complete 

Waiting for input 

Attached to MUJ 
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NOTES: LOW SPEED USER TABLE (CONT'D) 



W.IUFST(3) 


C.IUFILE 




Bits 0-5 




Count of FNT entries in swap file 


6 


S.IUEOE 


End of execution 


7 


S.IUDMP 


SAVEFL flag 


8 


S.IUPS 


Pause bit 


9 


S.IUECS 


Swap file on ECS 


10 


S.IUFNT 


FNT to be associated on next swap 


11 


S.IURED 


REDUCE flag 


W.ITNPUT(6) 


C.IFSTAT 




Bit 


S.ITMIT 


Read cards now 


1 


S.ITFIL 


= reading jobs 

1 = reading named file 


2-4 


S.ITERR 


001 = reader not ready 

010 = input file error 

011 = card read error 
100 = job card error 


5 


S.IEOF 


End-of-file card read 


6 


S.IFEOF 


Stop at end of current message 


7 


S.IREAD 


READ command issued 


8-11 


S.ICRDS 


Number of words of current card already written 



W.ITOPUT(7) 

Bits 10-6 
11 



C.IDOTIN 

Count of data words in output buffer past IN 
1 = at least a partial word past IN 



WJTOPUT(7) 

Bit 

1 



2-4 



CIFSTAT 

S.ITMIT 
S.ITDEV 

S.ITERR 



Send data 

= printer to receive 

1 = CRT to receive 
001 = printer not ready 
011 = PM message flag 



5 


S.IEOI 


EOI reached 


6 


S.IENDLP 


END,LP issued 


7 


S.ITSSP 


SUSPEND active 


8 


S.ITACT 


Printing to be done 


W.IUEQP(IO) 


C.IUMSG 




Bit 0-5 


S.IUMSG 


001 2 = BCD 200 UT 

010 2 = TTY 

100 2 ANSI 200 UT 


10 


S.ILS 


4800 baud UT 


11 


S.ISA 


Hardwired terminal 
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NOTES: LOW SPEED USER TABLE (CONT'D) 



W.IUDRVl(l) 


CIUDSTA 


Bits 0-1 


Station address ordinal received 




00 = address 141 




01 = address 140 




10 = address 161 




11 = address 160 


2-5 


Zero 


6-9 


Send message type 




= blanks to fill display input line 




1 = display output line 




2 = E3 write to request card input from UT 




3 = data to UT printer 




4 = send clear-write message after page wait 




10 = poll 


9-10 


Sending station address ordinal 


11 


(Unused) 



Bits 0-5 




= read 

1 = acknowledge 

2 = reject 

3 = error 


6 


S.IUDPAG 


Page wait flag 


n 
i 


S.IVEROR 


Transmission error on reply 


8 


S.IUBDCH 


Bad character received 


9 


S.IUBDWR 


Check for previous bad write 


10 




(Unused) 


11 


S.IUNODT 


No data expected 


W.IUAPP(14) 


C.IUFLGS 




Bits 0-5 


S.IUSSW 


Sense switch setting changes 


6-9 




(Unused) 


10 


S.ITLOK 


Lock bit 


11 




Login with unrestricted password 



W.IUACP/W.IUIUP(1 5) CIUCCA/C.IUIUP 

Bit 6 S.IUCCP Control cards moved to control point area 

7-10 (Unused) 

11 S.IUEDC Buffer contains control cards sent from EDITOR 
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59 



53 



47 



274 IGS USER TABLE 

35 23 



11 



W.IUSTA 



W.IUFST 



W.IINPUT 



W.IOTPUT 



W.IUGCAC 



W.IGHSU 
W.IUEQP 



W.IUACP 



C.INBUF 



Address next user table 
in chain 



C.IUSID 
User id 



C.IBSTAT 
Flags 



j 1 1.1 



C.IUIDA 



Job descriptor addr. 



C.IDINGT 



Graphics input data 
out pointer 



C.IDOTOT 



Graphics output data 
out pointer 



C.IUGCAC Console 
Access Flag 



C.IUGEF Err. Flag 
Saved by GEJ 



C.IUCLAS 

Job class before 
entering IGS queue 



C.IDININ 



Graphics input data 
in pointer 



C.IDOTIN 



Graphics output data 
in pointer 



C.IUGEN Err. Mes- 
sage Console No. 



C.IUPORT 

Est 
ordinal 



Port 
no. 



C.IGFLGS 



C.IUCCA 

I Control Card Buffer 
Address 



C.IGHSU 



Pointer to high 
speed user table 



C.IUMSG 



10 



• S.IG3TT 3TT interlock flag 
-S.IGQUE flag job queued for first console 
-S.IGSNON SIGNON user table flag 
-S.IGDRP IGS job termination flag 
■S.IGSNIT SIGNON initialization 

• S.IGCON console number for which job is queued 



10 



11 



15 



17 
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LCC USER TABLE 



59 



53 



47 



35 



29 



23 



11 



W.IUSTA 

W.IUCMD 

W.IFLGS 

W.IJBCRD 

W.IUMUJ 



W.IUFST 

W.! INPUT 

W.IOTPUT 

W.ISDOT 

W.ISDIN 

W.IUEQP 

W.IUDRV1 

W.IUDRV2 

W.IUAFT 

W.IUAPP 

W.IUACP 
W.IUIUP 

W.IUATIM 
W.IINS 



C.INBUF 
00 I 



Address of Next 
LCC User Table 



C.ICMD 



C.IUMJS 
MUJ Status 



C.IPARAM 
Parameter 



C.IUSID 
User ID 



C.ITIME 
Timer 



C.IJBCRD 



Pointer to Job Card 



C.IUiyiJP 



MUJ Table Pointer 



C.IUJDA. 



JDT Address 



C.IUEQC 

Swap File 

Equipment Code 



C.IUFRB 
Swap File First 
RBT Word Pair 



C.IDINOT 



input Jala \jkj i i wiinci 



C.IDOTOT 
00 



Output Data OUT Pointer 



C.IDINOT 

Command OUT Pointer 



C.IUFL 

Swap File 

Length/ 100B 



C.IUPFL 
Positive FL/100B 



C.IDININ 
00 



Input Data IN Pointer 



C.IDOTIN 



Output Data IN Pointer 



C.IDININ 



Command IN Pointer 



C.IUEST/C.IUPORT 
EST j Line 
Ord Number 



C.ISTST 

interactive stream 

output | input 

state state 



C.IBCNT 

Interactive input 
stream byte count 



C.IUAUT Address 

of Aux. User Table 



C.IDININ 

C.IBPOS 



C.IBSTAT 
Flags 



1001 



C.IUSTAT 
Flags 



C.IUMORD 

MUJ Ordinal 



C.IUFILE 

File Count 
and Flags 



C.ISIZLN 
Page Size 



C.ISIZLN 
Line Length 



y— Executing 
r Command 

3 



Ni — Command or 
Transmission 

4 Mode or 
Attached to 
MUJ 

5 



C.IDVTID 

Destination ID for 

DIVERT.LP 



C.IDVTID 

Destination ID for 

DIVERT.CP 



C.IUMSG 
Terminal Type 



C.ILNCNT 

Current 
line no. 



Batch Stream States 



C.ICUFL 
Current FL/100B 



C.IUACS 
Access Level 



C.IMXFL 
Max. FL/100B 



C.IUFLGS 
User Table Flags 



C.IUCCA/C.IUIUP 



Flags 



Control Card Buffer 



C.ICUTL 

Current 

Time Limit 



C.IMXTL 
Maximum 
Time Limit 



C.IMXFI 
Maximum Fiies 



PP Time as Number of Seconds * 4096 



CP Time as Number of Seconds * 4096 



Date of Login 
Y Y D D D 



Time of Login 
H H M M 



Reserved for Installations or Last Command for DSD Q-Display 



10 



11 



12 



13 



14 



15 



16 



17 
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NOTES: LCC USER TABLE 



.IUSTA(O) 




C.IBSTAT(4) 




Bits 


0-3 


S.ITYPE 


1001 LCC User Table Type 




4 


S.IDISC 


Terminal disconnected 




5-6 


S.ILOGO 


00 = user logged out 

01 = user logged in 

10 = auto-logout requested 

11 = auto-logout in progress 




7-8 


S. 1ST ATE 


01 = waiting input 

10 = waiting output 

11 = active or assigned to control point 




9 


S.IRDIS 


Request disconnect 




10 


S.IUTAPE 


Request paper tape reading 




11 


S.IABRT 


Abort request 



W.IFLGS(l) 

Bits 0-1 1 



W.IFLGS(l) 

Bits 0-5 
6 
7 
8 
9 
11 

W.IUMUJ(2) 

Bit 

1 

2 

3-6 

7 

8 

9 

10 

11 



CICMD(O) 

No command 

13 No command-MES active 

14 No command-attached to MUJ 

15 No command-flag for 1CI 



C.IPARAM(l) 



Parameter for 1CI overlay 



C.IUSTAT(4) 

Used by IDS to determine type of H display wanted 

S.IDVTCP Divert all CP files 

S.IDVTLP Divert all LP files 

S.IOFFL Offline 

S.ILUTBY Set by 1LX; user table can be released 

S.ICTAPE Paper tape on flag 

C.IUMJS(O) 

S.IMNUS New user 

S.IMRUN RUN command in progress 

S.IMDIS Reconnected after disconnect 

(unused) 

S.IMBKS Break sent 

S.IMLGS Logout sent 

S.IMWO Waiting for output to complete 

S.IMWI Waiting for input 

S.IMUJ Attached to MUJ 



W.IINPUT(4) 

Bits 0-1 1 



C.ISIZLN(4) 



No, of lines/page 
= 7777B TTY 

= 14D HSBT with 16x80 screen 
= 16D HSBT with 18x64 screen 
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NOTES: LCC USER TABLE (CONT'D) 



W.IOTPUT(5) 

Bits 0-11 



C.ISIZLN(4) 



No. of characters/line 
= 72D TTY 

= 80D HSBT with 16x80 screen 
= 64D HSBT with 18x64 screen 



W.IUEQP(IO) 

Bits 0-17 

23 



W.IUEQP(IO) 

Bits 0-11 



C.IUAUT(2) 

Auxiliary user table pointer 

=0 Auxiliary user table available 

=1 Auxiliary user table not available 

CJUMSG(4) 

Terminal type 
=2 TTY 
=22B HSBT 



W.IUDRVl(ll) 

Bits 0-10 
11 



W.IUDRVl(ll) 

Rit« n.i 7 



W.IUDRVl(ll) 

Bits 6-8 
9 

10 

11 



C.IBCNT(1) 

Interactive input stream byte count 

=0 Current input line terminated with CR 

=1 Current input line terminated with LF 

C.IDININ(2) 

—Q n revious in n ut line terminated "" + h '"'^ 

j0 IN pointer for previous input line terminated with LF 

C.IBPOS(2) 

Byte position for previous input line terminated with LF 

=0 Store next input character in right half of byte 

=1 Store next input character in left half of byte 

=0 Last operation was input 

=1 Last operation was output 

=1 Teletype output was interrupted 



W.IUDRV2(12) 

Bits 0-5 
6-11 

W.IUDRV2(12) 

Bits 0-5 
6-11 



Byte 0(0) 

Batch stream state — stream no 5 
Batch stream state — stream no 4 

Byte 1(1) 

Btach stream state — stream no 7 
Batch stream state — stream no 6 



W.IUDRV2(12) 

Bits 0-5 
6-11 



Byte 2(2) 

unused 

Batch stream state — stream no 8 
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NOTES: LCC USER TABLE (CONT'D) 



W.IUDRV2(12) 


Byte 3(3) 




Bits 0-5 


unused 




6-11 


Batch stream state 


— stream no 10 


W.IUDRV2(12) 


Byte 4(4) 




Bits 0-5 


unused 




6-11 


Batch stream state 


— stream no 12 


W.IUAPP(14) 


C.IUFLGS(l) 




Bits 0-5 


S.IUSSW 


Sense switch setting changes 


6-9 




Unused 


10 


S.ITLOK 


Lock bit 


11 




Login with unrestricted password 


W.IUACP(15) 


CIUIUP(O) 




Bit 6 


S.IUCCP 


Control cards moved to control { 


7-10 




Unused 


11 


S.IUEDC 


Buffer contains control cards sem 
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AUXILIARY LCC USER TABLE 



W.IUSTA 
W.ICSTAT 1 

W.IDS1X 2 

3 

W.IDS2X 4 

5 

W.IDS3X 6 

7 

W.IDS4X 10 

11 

W.IDS5X 12 

13 

W.IDS6X 14 

15 

W.iDS7X 16 



59 



35 



23 



r— No. of data streams 
defined and ON 

11 3 



C.INBUF 








C.IUSID 
Terminal ID 



C.ILCADS 



C.IBSTAT 



0110 



Last Stack Request Response 



Data Stream Word Pairs 
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OUTPUT DATA STREAM WORD PAIR 





59 56 53 




47 


35 29 


23 


11 





W.IDS-X 


C.IXOTIN 

IBytej 
|Pos.| 


Output IN Pointer 


C.IFCM 

Special 
Disposition Code 


C.IFNT 

FNT Address 


C.IFSTAT .. 


W.IDS-X+1 


C.IFDC 
Disposition 




C.IXOTOT 

C |Byte? S 0ut P ut 0UT Pointer 
I Pos. I 


C.IFSTAT 



NOTES: LCC OUTPUT DATA STREAM WORD PAIR 

W.IDS-X C.IFSTAT(4) 

Bit S.IOFF Set/cleared by 1LX to request 1ZZ off /on stream 

1 S.IXABT Set by 1LX to request 1ZZ abort stream 

2 S.ISTOP Set by 1LX to request 1ZZ stop processing stream 

3 S.IETX Set by 1LX to request 1ZZ sent ETX block 

4 Unused 

5 S.IEOL End-of-line flag 

6 S.IXNDLP End flag 

7 S.ISUP Suppress-carriage-control flag 

8 S.IBAN No-banner flag 

9 S.IHDR Header flag 

10 S.IWEOJ Wait-end-of-job flag 

11 S.IWAITX Wair-for-driver flag 



W.IDS-X+1 

Bits 



0-5 

5 

6 

7-9 

9 

10-11 



C.IFDC(O) 

S.ILP 
S.ISNT 
S.IDC 
S.IPBIN 



Disposition code 

Print file 

Banner/laced card not sent 

Mode code 

Punch binary 

Unused 



W.IDS-X+1 

Bit 




1 

2 
3 
4 
5 
6-11 



C.IFSTAT(4) 

S.IOFF 

S.IXABT 

S.ISTOP 

S.IETX 

S.IXABTI 

S.IDSN 



Set/cleared by 1ZZ to indicate stream off/on 
Set by 1ZZ to indicate stream aborted 
Set by 1ZZ to indicate stream stopped 
Set by 1ZZ to indicate ETX block sent 
Set by 1ZZ to indicate abort issued 
Unused 
Stream no. 
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INPUT DATA STREAM WORD PAIR 





59 


56 


53 


47 


35 




29 


23 


11 





W.IDS-X 


C.I Dl NOT 

Byte 
Pos. 


Input OUT Pointer 


C.IRPC 
Compression Count 


C.IFNT 

FNT Address 


C.IFSTAT 


W.IDS-X+1 




C.IBCNT 

Byte Count 


C.IDININ 

C.IBPOS . tlMD . 
q te Input IN Pointer 

Pos. 


C.IFSTAT 












-0 = ETX Block Received 
1 = ETB Block Received 











NOTES: LCC INPUT DATA STREAM WORD PAIR 



W.IDS-X 




C.IFSTAT(4) 


Bit 





S.IOFF 




1 


S.IXABT 




2 


S.ISTOP 




3 






4 






5 


S..IXEOF 




6 


S.IJCIP 




7 


S.IJCER 




8 


S.IASC 




9 


S.IBIN 




10 


S.IWEOJ 




11 


S.IWAITX 


W.IDS-X+1 




C.IFSTAT(4) 


Bit 





S.IOFF 




1 


S.IXABT 




2 


S.ISTOP 




3 


S.IETX 




4 


S.IXABTI 




5 






6-11 


S.IDSN 



Set/cleared by 1LX to request 1ZZ off /on stream 

Set by 1LX to request 1ZZ abort stream 

Set by 1LX to request 1ZZ stop processing stream 

Unused 

Unused 

End-of-file flag 

Job-card-in-progress flag 

Job-card-error flag 

ASCII mode 

Binary mode 

Wait-end-of-job flag 

Wait-for-driver flag 



Set/cleared by 1ZZ to indicate stream off/on 
Set by 1ZZ to indicate stream aborted 
Set by 1ZZ to indicate stream stopped 
Set by 1ZZ to indicate ETX block received 
Set by 1ZZ to indicate abort issued 
Unused 
Stream no. 
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RECORD BLOCK TABLE ENTRY 



First RBT Word Pair: 



59 



47 S.RBTRBR 



35 



29 



23 



11 



C.RBTWPL 
Next Word Pair 


C.RBTRBR 

C.RBTFB 

RBR Ordinal 


3 


C.RBTAL 
. Alloc. 
I Type 


C.RBTPRU 
Last PRU + 1 


C.RBTBIT 
Flags 


RB3 


RB4 


RB5 


RB6 


RB7 



Other Word Pairs: 



59 


47 




35 


23 


1 


C.RBTWPL 
Next Word Pair 


C.RBTRBR 

C.RBTFB 

RBR Ordinal 





RBO 


RB1 


RB2 


RB3 


RB4 


RB5 


RB6 


RB7 



C.RBTBIT 

11 10 9876543210 



S.RBTDEV — Assigned by device type — ' 
S.RBTEST — Assigned by EST ordinal — 
S.RBTPFD — PF device assigned — 

S.RBTNEW - RBT new — 

S.RBTOVF — Overflow — 

S.RBTRND - Random — 



■ — (Reserved) 

— (Reserved) 

— (Reserved) 

— (Reserved) 

— (Reserved) 

— FO = IS/DA - S.RBTSAM 
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RECORD BLOCK TABLE BYTE 

(Computation of physical addresses for default allocation styles) 
11 10 9876543210 



814 



i 1 1 1 1 1 1 — r 

Track Number 



6603 





z 


1 1 1 1 1 1 

Head Position 


1 
HG 


O/E 



6638 



1 1 1 1 1 

Head Position 


S 


1 1 1 
Head Group 


O/E 



865 



1 1 

000 


O/E 


1 1 1 1 1 
Head Group 


1 
SG 



854 



I 1 1 1 

Track Number 



821 



1 — | 1 1 1 1 1 1 — I 1 r 

N 



841 



821 * 



Z Zone 




= Outer 

1 = Inner 






HG Head Group 








O/E Odd/Even 




= Even 

1 = Odd 






S Stack 










SG Subgroup 






841 


Cylinder 


Cylinder 


Nr 


-J 




Track 


Track 
Sector 





1 


if N-1 is even 
if N-1 is odd 




Sector 



N-1 
5 



N-1 



8 * remainder of 1 ^r J - modulo 20 
5 

N-1 

if remainder of — r— < 2 

5 — 

N-1 

1 if remainder of — — > 2 

5 
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SECTION 2 
JOB CONTROL POINT TABLES 



60307400 A n _ 2 _i 



RA COMMUNICATION AREA 



59 



RA+0 



RA+1 



RA+2 



RA+53 



RA+54 



RA+63 



RA+64 



RA+65 



RA+66 



RA+67 



RA+70 



M 



RA+77 



35 29 23 17 



11 



SS 



SL 



User/System Interface 



Parameter 



(Reserved) Code 



1AJ Bootstrap for Absolute Programs 



Name/Library Name 



LWA+1 of Loadable 
Area in ECS 



: WA of Loadable 
Area in ECS 



Number of Parameter Words, 
Beginning in RA+2 



LWA+1 of Loadable 
Area in CM 



FWA of Loadable 
Area in CM 



Control Statement Card Image 
[Replaced by Operator Message if CFO Type-in) 



Run 2.3 ASA Flag +0 = Non-ASA; -0 = ASA 



User Program 
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NOTES: RA COMMUNICATION AREA 

R Job dependency recheck bit 

T Storage move flag (1 = move being attempted) 

P Pause flag (1 = control point pausing) 

SS Sense switches 

SL Sense lights 

CODE 00 = Continuation 

01 = Comma 

02 = Equals sign 

03 = Slash 

04 = Left parenthesis 

05 = Plus sign 

06 = Minus sign 

07 = Blank 

10 = Semi-colon 

11 = 

12 = 

13 = (reserved) 

14 = 

15 = 

16 = Other 

17 = Termination 

L Library /file flag (1 = name is library name) 

X XJ flag: if XJ = 1, and XJ can be issued 

C LDV completion flag (bit 29) 

D DIS RSS flag (bit 18) 

M CMU Bit 
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FILE ENVIRONMENT TABLE 



59 



53 



41 



35 32 29 



23 



17 13 



6RM- 
CPC- 



LOGICAL FILE NAME 



DEVICE TYPE 



DISPOSITION 
CODE 



FET 

LENGTH 

-5 



FNT POINTER 



RECORD BLOCK SIZE 



PRUSIZE 



DETAIL 

ERROR CODE 

(XP=1) 



FWA 
WORKING STORAGE AREA 



POINTER TO 

FET EXTENSION 

(XP=1) 



UBC 



LEVEL 
NO. 



ERROR 
CODE 



CODE/STATUS 



FIRST POINTER 



IN POINTER 



OUT POINTER 



LIMIT POINTER 



PSEUDO IN POINTER 



LWA+1 
WORKING STORAGE AREA 



1LRS (S/L TAPES ONLY) 



RECORD REQUEST/RETURN INFORMATION 
(RANDOM RMS ONLY) 
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SCOPE CIO CODES IN OCTAL 

All codes are shown for coded mode operations; add 2 for binary mode. Example: 010 is coded READ, 012 
is binary READ. 



000 


RPHR 


004 


WPHR 


010 


READ 


014 


WRITE 


020 


READSKP 


024 


WRITER 


030 


- 


034 


WRITEF 


040 


BKSP 


044 


BKSPRU 


050 


REWIND 


054 


- 


060 


UNLOAD 


064 


- 


070 


RETURN 


074 


- 


100 


OPEN.NR 


104 


OPEN WRITE.NR 


110 


POSMF 


114 


EVICT 


120 


OPEN,NR 


124 


- 


130 


CLOSE,NR 


134 


- 


140 


OPEN 


144 


OPEN WRITE 


150 


CLOSE 


154 


- 


160 


OPEN 


164 


- 



170 


CLOSE,UNLOAD 


174 


CLOSE,RETURN 


200 


READC 


204 


WRITEC 


210 


READLS 


214 


REWRITE 


220 


RESERVED FOR KRONOS READEI 


224 


REWRITER 


230 


- 


234 


REWRITEF 


240 


SKIPF 


244 


- 


250 


READNS 


254 


- 


260 


READN 


264 


WRITEN 


270-274 


- 


300 


OPEN.NR 


304-324 


- 


330 


CLOSER 


334 


- 


340 


OPEN 


350 


CLOSER 


354-364 


- 


370 


CLOSERUNLOAD 


374474 


- 


500-574 


RESERVED FOR INSTALLATIONS 


600-634 


- 


640 


SKIPB 


644-774 


- 
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LOCAL SCRATCH FILE NAMES 



ZZZZZ01 


(EDITLIB) 


Reset file 


ZZZZZ02 


(EDITLIB) 


Restore file 


ZZZZZ03 


(EDITLIB) 


System extend file 


ZZZZZ04 


(EDITLIB) 


System file 


ZZZZZ05 


(EDITLIB) 


Interpreted directives 


ZZZZZ06 


(EDITLIB) 


ECS resident routines library file 


ZZZZZ07 


(EDITLIB) 


Entry point name table spill file 


ZZZZZ08 


(EDITLIB) 


Program number table spill file 


ZZZZZ09 


(DIAXNOS) 




ZZZZZIO \ 
ZZZZZll ) 




Program name table spill file 




External reference table spill file 


ZZZZZ12 ( 




External reference collection spill file 


zzzzzB ; 


(EDITLIB) 


Library or deadstart program collection file 


ZZZZZ14 I 




Scratch 


ZZZZZ15 1 




PP program name table spill file 


ZZZZZ16 ' 




Library name table spill file 


ZZZZZ17 


(LOADER) 


Entry point list 


ZZZZZ18 


(LOADER) 


Owned global blocks 


ZZZZZ19 


(FORM) 




ZZZZZ1A-1Z 


(SORT/MERGE) 




ZZZZZ20 


(FORM) 




ZZZZZ21 


(FORM) 




ZZZZZ22 


(6RM) 




ZZZZZ23 


(EDITLIB) 


Current directory file 


ZZZZZ24 


(QUERY/UPDATE) 




ZZZZZ25 


(LOADER) 


Global library set 


ZZZZZ26 


(GRAPHICS) 




ZZZZZ27 


(LOADER) 


Overlay/segment generator 


ZZZZZ28 


(DEBUGGING AIDS) 




ZZZZZ29 


(LOADO) 


ECS hold file 


ZZZZZ2A-2Z 


(SORT/MERGE) 






/T r» 4 TXT7 T> \ 

(l.AJ'AiJ'ClS.j 


prnmr n ^ -t- ^i - <" i- — \ 

3E,vjmj_JL» scraicn me (.raiiuoin) 


ZZZZZ31 


(LOADER) 


SEGBILD sort file (random) 


ZZZZZ32 


(LOADER) 


SEGBILD sort file (random) 


ZZZZZ3A-3Z 


(SORT/MERGE) 




ZZZZZ41-47 


(COBOL) 




ZZZZZ50-59 


(PL1) 




ZZZZZAA-A9 


(Index Processor) 




ZZZZZBA-BO 


(Index Processor) 




ZZZZZC3 


(CDC Special Systems) 




ZZZZZC4 


(CDC Special Systems) 




ZZZZZCP 


(INTERCOM) 


Copy permanent files 


ZZZZZDF 


(6RM/LOADER) 




ZZZZZEF 


(6RM) 


Error message file 


ZZZZZll 


(ALGOL) 


Scratch file 


ZZZZZI2 


(ALGOL) 


Scratch file 


ZZZZZIN 


(PAGE Utility) 




ZZZZZOP 


(FTN 4.0/COMPASS) 




ZZZZZOU 


(PAGE Utility) 




ZZZZZQU 


(QUERY/UPDATE) 
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LOCAL SCRATCH FILE NAMES (CONT'D) 



ZZZZZPA 

ZZZZZPB 

ZZZZZPC 

ZZZZZPD 

ZZZZZPE 

ZZZZZPF 

ZZZZZPG 

ZZZZZPT 

ZZZZZPW 

ZZZZZRE 

ZZZZZRL 

ZZZZZRM 

ZZZZZRN 

ZZZZZSA-SD 

ZZZZZSE 

ZZZZZSF 

ZZZZZUN 

ZZZZZVx-Zx 



(PFM) 

(PFM) 

(PFM) 

(PFM) 

(PFM) 

(PFM) 

(PFM) 

(PFM) 

(PFM) 

(INTERCOM) 

(FTN 4.0/COMPASS) 

(FTN 4.0/COMPASS) 

(PAGE Utility) 

(SIFT) 

(EDITOR/SETUP) 

(SETUP) 

(INTERCOM) 

(Installations) 



Scratch file 
Scratch file 
Attached RBTC 
Attached PFD 
Reserved 
Attached PF 
Reserved 
PF dump tape 
Attached PF DUM 
Restricted passwords 



Unrestricted passwords 
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ENTRY POINT NAMES 



AGxxxxx ) 

ALxxxxx 

ATxxxxx 

BAxxxxx 

CBxxxxx 

COxxxxx 

CPxxxxx 

D.xxxxx 

DIxxxxx 

EBxxxxx 

ECxxxxx 

EHxxxxx 

FExxxxx 

FXxxxxx 

FMxxxxx 

FTxxxxx 

G6xxxxx 

G7xxxxx 

INxxxxx 

IXxxxxx 

ISxxxxx 

ITxxxxx 

I7xxxxx 

ISxxxxx 

JVxxxxx 

MIxxxxx 

MRxxxxx 

OHxxxxx 

OPxxxxx 

OTxxxxx 

PLxxxxx 

PTxxxxx 

QUxxxxx 

RMxxxxx 

SCxxxxx 

SIxxxxx 

SMxxxxx 

SOxxxxx 

SSxxxxx 

SUxxxxx 

Uxxxxxx 

Vxxxxxx 

Wxxxxxx 

Xxxxxxx 

Yxxxxxx 

Zxxxxxx 



ALGOL 

APT 
BASIC 

COBOL 

COMPASS 

COBOL 

CE Diagnostics 

8231 IMPORT 

EXPORT IMPORT 200 

6000 EXPORT Highspeed 

FORTRAN Extended 

FORM 

RUN 

IGS/6000 EXPORT HS 

IGS/1700 IMPORT 

INTERCOM 

Index Processor 

SIS 1.0 

INTERCOM 

1700 IMPORT HS 

8231 IMPORT HS 

JOVIAL 

1700 MSOS IMPORT HS 

MARS VI 

OPHELIE 

OPTIMA 

PL1 

PERT/TIME 

QUERY UPDATE 

6RM 

SCOPE 

SIMSCRIPT 

SORT/MERGE 

SIMSCRIPT 
SIMULA 



Reserved for Installation 
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FET ERROR CODES - WORD 1 

01 End of information 

02 End of reel 
04 Parity error 

10 Device capacity exceeded . 

21 End of multi-file set 

22 Fatal error 

23 Index buffer full 

24 Reserved 

25 Index full on random read/write of record n 

26 Nonexistent record named on random read 

27 Nonexistent record named on random write and index is full 

30 Function undefined on device 

31 Permission not granted 

32 Function illegal on permanent file 
33-37 Reserved 

FET FLAG BITS - WORD 2 - Meaning if bit is set 



Bit 



47 


(R) 


46 


(N) 


45 


(UP) 


44 


(EP) 


43 


(EB) 


42 


(IN) 


41 


(XL) 


40 


(XP) 


39 


(EC) 


38 


(NS) 


37 




36 


(ST) 



Process SCOPE index if OPEN/CLOSE; else random read /write 

Release record blocks as read 

User processing at end of volume 

User processing on error condition 

Reserved 

INTERCOM (multi-user job or graphics) 

Extended label processing 

Extended error processing 

Disallow automatic allocation of ECS buffer 

File has non-standard labels; processing of label records is left to user 

Reserved 

6000 Station control point 



FET DETAIL ERROR CODES - WORD 7 

Software Warning 

0000-0017 (Reserved) 

0020 25 feet erased (not ANSI compatible) 

0021 Erase limit (installation-defined) 

0023 Bad erase 

0024 Read opposite mode successful 

0025 Noise in inter-record gap 

0026 Function not complete 

0027 Possible record fragment 

0030 Record length greater than PRU size or MLRS as applicable 



Bad Hardware Status 

0040 
0041 



Lost data 

Tape parity error 
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FET DETAIL ERROR CODES - WORD 7 (continued) 

Hardware Malfunction 

0050 MMTC memory parity error 

0051 Transmission parity error 

Position Uncertain 

0100 Valid data probably destroyed — highly unlikely that a close will be successful 

0101 Valid data probably intact — likely that a close will be successful 
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FILE INFORMATION TABLE 



59 



53 



35 



29 



23 



LFN 
Logical File Name 




RL 
Current Record Length 


P 
M 


FO 


M 
1 
X 


BT 


B 
C 
K 


D 
T 


RT 


D 
K 
1 


1 

PD 


FDT 
File Description Table 


FET 
FET Address 


PTL 
Partial Transfer Length 


OF 


VF 


CF 


LT 


ULP 


FP 


LX 
Address of Label Routine 


HL 

Header Length of T Record 

MNR 

Minimum Length of R Record 


BFS 
Buffer Size (in Words) 


DX 
Address of End-of-Data Routine 


TL 
Trailer Length of T Record 






SES 


IRS 


EX 
Address of Error Routine 


ES 


VNO 


ECT 
Error Count 


ERL 
Error Limit 


F 
P 
B 


S 
V 



S 
P 
R 




S 
D 
S 


OC 


F 
W 
1 


o 

N 


L 
C 
R 




H 
B 


LVL 


FWB 
FWA of User Buffer 


FL 

Length of F/Z Record 

MRL 

Maximum Record Length 




C 

M 


EO 


WSA (WSAL) 
FWA of Working Storage Area 


KP 


KL 
Key Length 


MKL 
Major Key Length 


RKP 


RKW 


PNA(PNAL) 
Address of Partition Name 




IP 


DP 


KA 
Address of Key 


MNB 
Minimum Block Length 


RMK 

Record Mark 

Character 


PC 


LA 
FWA of Label Area 


KT 


LP 
BCP of D Record Length Field 


RB 
No. of Records in K Block 


PAR 
Parameter List Address 


CP 
BCP of T Record Trailer Count Field 


LL 
Length of D Record Length Field 


W 
P 
N 


LOP 


RC 
Record Count 


CL 
Length of T Record Trailer Count Field 


LBL 
Length of Label Area 


MUL 


BN 
Current Block Number 




TRC 


ECL 
Error Code Location 


MBL 
Maximum Block Length 


NL 


FLM 


DL 




PRS 


IBL 
Index Block Length 


WA 
Current Word Address 


Reserved for Installation 


HMB 
Number of Home Blocks 


HRL 
Address of Key Hashing Routine 




CDT 




DCT 





10 



12 



13 



14 



15 



16 
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NOTES: FIT 

Word 1: 35 PM 



processing mode (6RM only) 

random 

1 sequential 



34-32 


FO 


file or 


ganization 






000 


sequential (SQ) 






001 


word addressable (WA) 






010 


direct (DR) 






011 


indexed sequential (IS) 






100 


library (partition) (LB) 






101 


direct access (DA) 


31 


MIX 


reserved for future access method 


30-28 


BT 


block 

rt «. ^ \ 


type 






000) 
001 j 


default /internal (I) 






010 


character count (C) 






011 


record count (K) 






100 


exact records (E) 


27 


BCK 


block checksums (not supported for SQ files) 









no 






1 


yes 


26 


DT 


device 


type (6RM only) 









mass storage 






1 


tape 


25-22 


RT 


record 


type 






0000 


control word (W) 






0001 


fixed length (F) 






0010 


record mark (R) 






0011 


zero byte (Z) 






0100 


decimal character count (D) 






0101 


trailer count (T) 






0110 


binary character count (B) 






0111 


undefined (U) 






1000 


SCOPE logical records (S) 



21 DKI 



20-18 PD 



duplicate key indicator; indicates duplicate key permission on an IS file. 

no 

1 yes 

processing direction 
000 v input (INPUT) 



001 
010 
011 
100 



output (OUTPUT) 
input/output (I-O) 
reverse (REV) 
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NOTES: FIT 

Word 2: 35-34 OF open flags, positioning of file at OPENM time 

00 



( rewind (R) 

10 no rewind (N) 

1 1 extend (E) 

33-32 VF end of volume flags, positioning of file volume CLOSEM time 

00 unload (default) 

01 rewind (R) 

10 no rewind (N) 

11 unload (U) 

31-30 CF close flags, positioning of file at CLOSEM time 

Q1 / rewind (R) 

10 no rewind (N) 

1 1 unload (U) 

29-28 LT label type 

00 ANSI standard (ST) 

01 non-standard (NS) 

10 unlabeled (UL) 

11 any (ANY) 

27-25 ULP user label processing 

000 none 

001 VOL/EOV (V) 

010 HDR/EOF (F) 

011 VOL/HDR/EOF/EOV (VF) 

100 UHL/UTL/UVL (U) 

101 VOL/UHL/UTL/UVL/EOV (VU) 

1 1 HDR/EOF/UHL/UTL/UVL (FU) 

111 all (VFU) 

24-18 FP file position (in octal) 

mid record 

1 in header label group, (only set during user label processing) 

2 beginning of information /volume (BOI/BOV) only set on SKIPBu in 
connection with DX 

4 end of volume (EOV) 

10 end of section (EOS) 

20 end of record (EOR) 

40 end of partition (EOP) 

100 end of information (EOI) 
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NOTES: 


FIT 








Word 4: 


35-18 


ES 


error 


status 




35 


FNF 


fatal/ 



1 


non-fatal flag 
non-fatal 
fatal 




34-31 


reserved 








30-27 


SES 


syster 


n error severi 



Word 5: 



26-18 


IRS 


59-54 


VNO 


35 


FPB 


34 


SVO 



01 read parity error level 1 

02 read parity error level 2 

03 read parity error level 3 

04 read parity error level 4 

05 write parity error level 1 

06 write parity error level 2 

invalid request subfield (6RM error code) 

current volume number of multi-volume sequential file 

file position bit; for use by user 

SIS version number 

SISV1 user 

1 SISV2 user 



33 SPR suppress read ahead 

read ahead/write behind (buffered sequential I/O) 

1 no read ahead/no write behind (unbuffered sequential I/O) 



32 


unused 




31 


SDS 


system error message 


30-29 


OC 


open/close 

00 never opened 

01 opened 
10 closed 



28 FWI forced write of IS and DA file blocks 

no forced write (NO) 

1 forced write (YES) 

27 ON old/or new file 

old (OLD) 

1 new (NEW) 
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NOTES: FIT 
Word 5: (Cont'd) 

26 LCR label action on PD=I-0 tape 

create (new) labels (N) 

1 check existing labels (E) 

24 HB reserved for future access method 

23-18 LVL level number of an S-type record 

Word 6: 25 CM conversion mode (EC to IC) 

no conversion (NO) 

1 conversion (YES) 

24-22 EO error option 

000 terminate job (T) 

001 drop erroneous data (D) 
010 accept (A) 

100 terminate job and display data (TD) 

101 drop erroneous data and display data (DD) 
110 accept erroneous data and display data (AD) 

Word 7: 59-56 KP beginning character position of key 

37-34 RKP relative key word position (DA files) 

33-22 IP index block padding factor (% padding) 

28-22 DP data block padding factor (% padding) 

Word 8: 27-22 PC padding character for sequential file blocks 

27-22 KT key type for indexed sequential files 

000000) , ,. rQ , 

oooooif ymbohc (s) 

000010 integer (I) 

00001 1 floating (F) 

000100 computational- 1 

000101 actual (A) 
000110 computational-2 

oooi ir 

> reserved for CDC 
111111 
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NOTES: FIT 
Word 10: 35-30 



Word 11: 



Word 12: 



35 

35-30 
23-18 
35-30 
29-0 
29-0 
17-0 
Word 15: 51-30 



LOP last operation code (the high order bit of LOP is a "write bit", indicating 

whether or not the last operation wrote data to the file). 

01 OPENM (OP) 

02 CLOSEM (CM) 

03 GET or GETP (GE) 

43 PUT or PUTP (PU) 

44 REPLACE (RP) 

04 SEEK (SE) 

05 SKIP (SK) or SKIPF (SF) 

06 DELETE (DE) 

07 GETN (GN) 
47 WEOR (WE) 

10 REWIND (RE) 

11 GETL (GL) or PUTL (PL) 

12 SKIPB (SB) 

13 CLOSEL (CL) 

14 LABEL (LL) 7DM only 
63 WTMK (WK) 

23 READS (RS) 

53 WRITES (WS) 

WPN write bit. The upper bit of LOP is a one-bit subfield that can be accessed 

separately; it is on (YES) if the last operation was a write. 

MUL multiple of characters per K, E type block 

TRC number of transactions to be traced (IS or DA files) 

NL number of levels of index blocks in an IS file 

DL directory length 

FLM file limit, records 'file IS 'DA) 

PRS previous record size after a forward sequential GET 

CDT address of collating sequence to display code conversion table for indexed 

sequential (IS) files 



21-0 DCT address of display code to collating sequence conversion table for indexed 

sequential (IS) files 

Words 16, 17, 18: Scratch area used by 6 RM 



60307400 A 



II-2-17 



FILE DEFINITION BLOCK 



59 



17 



118 5 



Permanent File Name 
(Left Justified Binary Zero Filled) 



Logical File Name (Left Justified, Binary Zero Filled) 



Return 
Code 



Parameter Value (Right Justified, Binary Zero Filled) 



NR (Bit 8) 

1 = NR option specified 

RC (Bits 7-6) 

01 = No RC or RT specified 

00 = RC option specified 

10 = RT option specified (implies RC as well) 



FC (Bits 5-2) 



0001 = SETP 
0010 = ATTACH 
0100 = CATALOG 
0110 = EXTEND 
0111= ALTER 
1000 = PURGE 
1010 = RENAME 
1100 = PERM 



1 = Function completed 



RC 



FC 



Key 
Word 



0000 



3 
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NOTES: FILE DEFINITION BLOCK 
Return code (Bits 17-9) 

Function successful 

1 ID error 

2 Lfn already in use 

3 Unknown lfn 

4 No room for extra cycle 

5 RBTC full 

6 No lfn or pfn 

10 Latest index not written 

11 File not on PF device 

12 File not in system 

13 Archive retrieval aborted 

15 Cycle number limit reached 

16 PFD Full 

17 Function attempted on non-permanent file 
20 Function attempted on non-local file 

22 File never assigned to a device 

23 Cycle incomplete or dumped 

24 PF already attached 

25 File unavailable 
27 Illegal lfn 

33 Alter needs exclusive, access 

35 File already in system 

70 PFM stopped by system 

71 Incorrect permission 

72 FDB address error 



Key Word 



01 


PP 


02 


RP 


03 


CY 


04 


TK 


05 


CN 


06 


MD 


07 


EX 


10 


RD 


11 


MR 


12 


SD 


13 


XR 


14 


ID 


15 


RN 


16 


AC 


17 


EC 



Privacy Procedure PP name 20 \ 

1UIV11UU11 1WJUU ^UOVi^ ' Z,l f 

Cycle Number 22 > 

Turnkey Password Definition 23 

Control Password Definition 24 

Modify Password Definition 25 

Extend Password Definition 26 

Read Password Definition 31 

Multi-Read Parameter 32 

Ignored 33 
Control, Modify, Extend Password Definition 
Owner-Identification 
Ignored 

Account Parameter 
ECS Buffering 



PW — Passwords 



FO — File Organization 

PS - Position 

LC — Lowest Cycle 

ST - Station ID (7000 only) 

RW — Multi-Access Rewrite 
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REQ FUNCTION PARAMETER LIST 



59 



47 



35 



23 



17 



11 



Logical File Name 







EST Ordinal 



Device Type 
and Alloc. Style 



Volume Serial Number 



(Reserved for 
Preallocation) 



Family Pack Name 



ECS Units 
(POrK) 



ECS Buffer 
Size 



Tape File Header Label Fields 



Bits 



59-52 

51 (MN) 

50 (A*) 

49 (EL) 

48 (NL) 

33 (EC) 

32 (OV) 

31 (PF) 

30 (US) 

29 (EB) 

28 (AA) 

27 (SY) 

26 (2D) 

25 (VS) 

24 (EN) 

23 (NS) 

22 (NR) 

21 (Z) 

20 (SR) 

19 (CI) 

18 (MF) 

17 (DP) 

16 (PK) 

15 (DD) 

14 (SV) 

13 (IU) 

12 (CK) 



Reserved 
= accept either MT or NT assignment 

= assign any RMS device (overrides device type specification) 
= extended label fields in parameter words 5-9 
= normal label fields in parameter words 5-8 
= ECS buffering requested; parameter word 4 
= allow overflow to a different device 
= assign file to a PF device 
= ASCII conversion mode on 9-track tape 
= EBCDIC conversion mode on 9-track tape 
= assign automatically 
= print card image from RA+70 
= assign 2 devices (DP,NT,MT only) 
= VSN declared in parameter word 3 
= tape has existing labels 
= tape has non-standard labels 
= disable standard tape parity recovery procedure 
= SCOPE 3.3 labeled tape 

= return error code without dayfile message or operator inter- 
vention 
= console checkpoint request 
= multi-user tape request 
= sequential pack request 
= family pack request 
= default density for labels and data 
= save tape 

= inhibit physical unload 
= checkpoint tape 



II-2-20 
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NORMAL LABEL FIELDS 



59 


47 




29 


23 




17 









Position Number 


Edition Number 


Retention Cycle 


Creation Date (YYDDD) 




Multi 


-File Set Name 




Reel Number 



EXTENDED LABEL FIELDS 



59 


53 






35 


29 




17 


5 


H 


D 


R 1 


c:i« i ~u„i m„, 




File 
Label 
Name 


Multi-File Set Name 


Reel Number 


Reel 
Number 


Position Number 


Generation Number 


Edition 
Number 


Edition 
Number 


Creation Date (A YYDDD) 
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SCOPE 3.4 
STANDARD CHARACTER SETS 








ASCII 




Hollerith 


External 


ASCII 






ASCII 




Hollerith 


External 


ASCII 




CDC 


Graphic 


Display 


Punch 


BCD 


Punch 


ASCII 


CDC 


Graphic 


Display 


Punch 


BCD 


Punch 


ASCII 


Graphic 


Subset 


Code 


(026) 


Code 


(029) 


Code 


Graphic 


Subset 


Code 


(026) 


Code 


(029) 


Code 


:t 




oot 


8-2 


00 


8-2 


3A 


6 


6 


41 


6 


06 


6 


36 


A 


A 


01 


12-1 


61 


12-1 


41 


7 


7 


42 


7 


07 


7 


37 


B 


B 


02 


12-2 


62 


12-2 


42 


8 


8 


43 


8 


10 


8 


38 


C 


C 


03 


12-3 


63 


12-3 


43 


9 


9 


44 


9 


11 


9 


39 


D 


D 


04 


12-4 


64 


12-4 


44 


+ 


+ 


45 


12 


60 


12-8-6 


2B 


E 


E 


05 


12-5 


65 


12-5 


45 


- 


- 


46 


11 


40 


11 


2D 


F 


F 


06 


12-6 


66 


12-6 


46 


* 


* 


47 


11-8-4 


54 


11-8-4 


2A 


G 


G 


07 


12-7 


67 


12-7 


47 


/ 


/ 


50 


0-1 


21 


0-1 


2F 


H 


H 


10 


12-8 


70 


12-8 


48 


( 


( 


51 


0-8-4 


34 


12-8-5 


28 


1 


1 


11 


12-9 


71 


12-9 


49 


) 


) 


52 


12-8-4 


74 


11-8-5 


29 


J 


J 


12 


11-1 


41 


11-1 


4A 


$ 


$ 


53 


11-8-3 


53 


11-8-3 


24 


K 


K 


13 


11-2 


42 


11-2 


4B 


= 


= 


54 


8-3 


13 


8-6 


3D 


L 


L 


14 


11-3 


43 


11-3 


4C 


blank 


blank 


55 


no punch 


20 


no punch 


20 


M 


M 


15 


11-4 


44 


11-4 


4D 


, (comma) 


, (comma) 


56 


0-8-3 


33 


0-8-3 


2C 


N 


N 


16 


11-5 


45 


11-5 


4E 


. (period) 


. (period) 


57 


12-8-3 


73 


12-8-3 


2E 








17 


11-6 


46 


11-6 


4F 


= 


# 


60 


0-8-6 


36 


8-3 


23 


P 


P 


20 


11-7 


47 


11-7 


50 


[ 


[ 


61 


8-7 


17 


12-8-2 


5B 


Q 


Q 


21 


11-8 


50 


11-8 


51 


] 


] 


62 


0-8-2 


32 


11-8-2 


5D 


R 


R 


22 


11-9 


51 


11-9 


52 


%tt 


% 


63 


8-6 


16 


0-8-4 


25 


S 


S 


23 


0-2 


22 


0-2 


53 


i= 


" (quote) 


64 


8-4 


14 


8-7 


22 


T 


T 


24 


0-3 


23 


0-3 


54 


-> 


(underline) 


65 


0-8-5 


35 


0-8-5 


5F 


U 


U 


25 


0-4 


24 


0-4 


55 


V 


! 


66 


11-0 or 


52 


1 2-8-7 or 


21 


V 


V 


26 


0-5 


25 


0-5 


56 








11-8-2ttt 




11-0ttt 




w 


w 


27 


0-6 


26 


0-6 


57 


A 


& 


67 


0-8-7 


37 


12 


26 


X 


X 


30 


0-7 


27 


0-7 


58 


t 


' (apostrophe) 


70 


11-8-5 


55 


8-5 


27 


Y 


Y 


31 


0-8 


30 


0-8 


59 


; 


? 


71 


1 1 -8-6 


56 


0-8-7 


3F 


Z 


z 


32 


0-9 


31 


0-9 


5A 


< 


< 


72 


12-0 or 


72 


12-8-4 or 


3C 








33 





12 





30 








1 2-8-2 tt t 




12-0ttt 




1 


1 


34 


1 


01 


1 


31 


> 


> 


73 


11-8-7 


57 


0-8-6 


3E 


2 


2 


35 


2 


02 


2 


32 


< 


@ 


74 


8-5 


15 


8-4 


40 


3 


3 


36 


3 


03 


3 


33 


> 


\ 


75 


1 2-8-5 


75 


0-8-2 


5C 


4 


4 


37 


4 


04 


4 


34 


~~ • 


-—(circumflex) 


76 


1 2-8-6 


76 


11-8-7 


5E 


5 


5 


40 


5 


05 


5 


35 


; (semicolon) 


; (semicolon) 


77 


12-8-7 


77 


1 1 -8-6 


3B 



OS 
O 

o 

o 
o 



tTwelve or more zero bits at the end of a 60-bit word are interpreted as end-of-line mark rather than two colons. End-of-line mark is converted to 

external BCD 1632. 
*tln installations using the CDC 63-graphic set, display code 00 has no associated graphic or Hollerith code; display code 63 is the colon (8-2 punch). 
tttThe alternate Hollerith (026) and ASCII (029) punches are accepted for input only. 



SECTION 3 
DISK TABLES AND FILE FORMATS 
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PERMANENT FILE DIRECTORY ENTRY 



59 



47 



35 



23 



11 



10 



11 



12 



13 



14 



15 



16 



7777c 



PF 



D3 



Subdirectory 
(ID Hash) 



C.PDFLAG 

PFN 
Hash 



(Right Justified, 
Blank Filled) 



OWNER-ID 



PERMANENT FILE NAME 
(Left Justified, Zero Filled) 



Cycle 



RBTA 



RBTO 



PRU 



RBTC 

Index 

Byte No. 



Cycle 



RBTA 



RBTO 



PRU 



RBTC 

Index 

Byte No. 



Cycle 



RBTA 



RBTO 



PRU 



RBTC 

Index 

Byte No. 



Cycle 



RBTA 



RBTO 



PRU 



RBTC 

Index 

Byte No. 



TK Password 



CN Password 



ID Password 



(Right-Justified, 
Zero Filled) 



EX Password 



RD Password 



S.PFDEU 
(Entry in Use) 

Utilities Flag 



14B 



Cycle 



RBTA 



RBTO 



PRU 



R BTC 

Index 

Byte No. 



FDB 
Code 



Dump Flag 
Incomplete Flag 



Archived 
Parity Error 



60307400 A 



II-3-3 



RBT CATALOG ENTRY 





59 


47 


35 


23 


11 


5 


1 


7777 


7777 


RB 


TC 


C.PCFLAG 
Flags 


2 


(Right Justified, 
Blank Filled) 


OWNER-ID 


14B 


3 






PERMANENT 
FILE 
NAME 




4 








5 








6 








7 


PFD Pointer 


CYCLE 


8 


Creation Date (J-Date) 


Retention 
Period 


EST 
Ordinal 


9 


Date of Last Attach 


Time of Last Attach 


10 


Date of Last Alteration 


Time of Last Alter 


11 


Number of 
Attaches 


Number of 
Extends 


Number of 
Rewrites 


Size of 
Entry 




12 





Pointer 
toS 


Pointer 
toT 


Subdirectory 


(Reserved) 


13 


Account Parameter (display zero-filled binary) 


16B 


14 


Dump Tape VSN No. 1 


Position 


15 


Dump Tape VSN No. 2 


P ° Siti0n (CKP) 

















** 



Installation Slot 



RBT Chain 



C.PCFLAG 
11 10 98 76543210 



9-Track Tape- 

Positioned- 

Random. 

FO = IS/DA- 



£ 



S.PFCEF(Entry Free Flag) 

New Version 

Archive 



Index,, 


Index- 


Index- 


Index., 


Number of Free 
Words in this PRU 



Word Oof an RBTC pru. 
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W RECORD HEADER 



59 



53 



41 



23 



17 



t 



(Reserved) 



Word Count of 
Previous Record 



Unused 

Bit 
Count 



Word Count of 
Current Record 



Reserved for Installation 
Delete Bit 
■-Flag Bit 
Parity Bit 



I BLOCK HEADER 



59 


53 


41 




17 





I 


Block 

Ordinal 

(Mod2 12 ) 


Record Number 


Word Offset 


•-(Re; 

■-Check 

—Parity b 


Reserved for Installat 
served ) 
sum bit 
it 


on) 









59 



52 



BLOCK FORMAT (DA FILE) 
34 29 



PRU Pointer to Previous 
Block in Chain 



Delete 
Bit - 



Unused 
Char 
Count 



PRU Pointer to Next 
Block in Chain 



(Reserved for Installation - BLK HDL Words) 



Record Length 
in Words 



PRU Pointer to Preceding Block If 
This is an Overflow Block 



Record 



Optional Checksum 



60307400 A 



II-3-5 



59 



INDEX BLOCK FORMAT (IS FILE) 

29 23 17 



INDEX 



Index 
Level Number 



First Word 
of Padding 



Low Key 



Flags 



PRU Pointer to Lower Index 
Level or to Data Block 



High Key 



Flags 



PRU Pointer to Lower Index 
Level or to Data Block 



Padding 



Optional Checksum 



59 



DATA BLOCK FORMAT (IS FILE) 

35 29 23 17 



PRU Pointer to 
Next Sequential Data Block 



Current Size of Padding 



First Word of Padding 



(Reserved for Installation - DAHDRSZW Words) 



Unused 

Bit 
Count 



Record Size 



Low Record 



Unused 

Bit 
Count 



Record Size 



High Record 



Padding 



High Key 



FWA of Record Header 



Lew Key 



FWA of Record Header 



Optional Checksum 



II-3-6 
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CHEKSUM 

HEADWORD 

TRAILERS 

FSTTSZW 

DAHDRSZW 

ABNORMB 

AVALDABK 

AVALINBK 

CHKSUMB 
CODITABL 
CODITAB2 
CODITAB3 
CODITAB4 
CODITAB5 
CODITAB6 
CODITAB7 
CODITAB8 

CURFILPP 

DABKSZP 

DABKSZW 

DAPADSZW 

DELETSTO 

DICOTABL 

DICOTAB2 

DICOTAB3 

DICOTAB4 

DICQTAB5 

DICOTAB6 

DICOTAB7 

DICOTAB8 

DUPKEYB 

FEMDABK 

FEMINBK 

FILDATE 

FILNAME 

FIRDABK 

INBKSZP 

INBKSZW 



59 



44 



FSTT tIS FILE) 

35 23 17 



FSTT Checksum 



A M 



(Reserved for SIP) 



FSTT Size in Words 



Data Header Size (words) 



-+ File Abnormally Terminated 



PRU Number of Next 
Empty Data Block 



PRU Number of Next 
Empty Index Block 



he- Checksum File 



Collating Sequence 
to Display Code 
Conversion Table 



PTREE Index 



Key Displacement in 
Data Block 



Address of 
Buffer Catalog 



Data Block Size in PRUs 



Data Block Size in Words 



Data Block Padding Size in Words 



Total DELETES 



Display Code to 
Collating Sequence 
Conversion Table 



-* : Duplicate Keys Allowed 



Deleted Data Block Chain Pointer 



Deleted Index Block Chain Pointer 



File Creation Date 



Logical File Name 



First Data Block Pointer 



Index Block Size in PRUs 



Index Block Size in Words 



10 
11 
12 
13 
14 

15 
16 
17 
20 

21 

22 

23 
24 
25 
26 
27 
30 
31 
32 
33 
34 
35 
36 
37 
40 
41 
42 
43 
44 
45 



59 



23 



17 



60307400 A 
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INPADSZW 
KEYBIAS 

KEYENSZW 
KEYPACKB 

KEYSZC 

KEYTYPE 

LASDABK 

MAXRECSZ 

MINRECSZ 

NRACSTO 

NRDABKTO 

NRDAREC 

NREMDABK 

NREMINBK 

NRINBKTO 

NRINSTO 

NRLVLSF 

NRWUDISK 

NXTUNASP 

PRINBK 

REPLACTO 

SEQINS$ 

TERMDATE 

TERMTIME 

UEPRINBK 



59 



FSTT(ISFILE) 

29 



23 



11 8 



2 



Index Block Padding Size in Words 



COMP-1 
Floating Bias 



Key Entry 
Size (words) 



Key Ends in Character Position 0-4 of Last Word 



Key Size in 
Characters 



Key Type 



Final Data Block Pointer 



Maximum Record Size in Chars 



Minimum Record Size in Chars 



Total GETs 



Total Number of Data Blocks 



Total Number of Data Records 



Number of Deleted Data Blocks 



Number of Deleted Index Blocks 



Total Number of Index Blocks 



Total PUTs 



Number Index 
Block Level 



Number of Unused Words on Disk 



Next Unassigned PRU Number 



Primary Index Block PRU Number 



Total REPLACES 



Limit of Sequential INSERTs 



Number of Sequential INSERTs 



Date of Last CLOSEM 



Time of Last CLOSEM 



Number of Unused Key Entries in Primary Index Block 



46 
47 

50 
51 
52 

53 

54 
55 
56 
57 
60 
61 
62 
63 
64 
65 

66 

67 
70 
71 
72 
73 
74 
75 
76 



II-3-8 



60307400 A' 



ENDFIXD 



CKSWORD 
HEADER 

TRAILERS 
FSTTSZW 
DAHDRSZW 
CSFLAG 
STATADD 
STATDLT 
STATRPL 
STATRET 
STATOVF 
STATHOM 
STATHR 
STATOR 
FILESZ 
KEYS 

MINMAXS 

NXTUNASP 

NXTUPDSK 

OVF 

DATABKSZ 

PRUBLK ^ 

RUNADD 

RUNDLT 

RUNRET 

RUNRPL 

RUNOVF 

RUNHOM 

RECHOM 

RECOVF 

NRCIOCLS 

CURPRU 

RELDBW 

BUFCATS 



59 



53 



FSTT (DA FILE) 

35 29 23 



17 



FSTT Checksum 



(Reserved for SIP) 



FSTT Size in Words 



Data Header Size (Words) 



• Block Checksum Option (BCK at OPENM NEW) 



Total Number of PUTs 



Total Number of DELETEs 



Total Number of REPLACES 



Total Number of GETs and GETNs 



Total Number of Overflow Blocks 



Relative Key Position (RKP) 



Number of Home Blocks in Use 



Total Number of Records in Home Blocks 



Total Number of Records in" Overflow Blocks 



Total Number of Home Blocks 



Relative Key Word (RKW) 



Minimum Record Size (MNR) Maximum. Record Size (MR L 



Key Length (KL) 



Next Unassigned PRU Number 



Next Usable PRU on disk 



Data Block Size (words) 



Number of PRUs per Block 



Number of PUTs - Current OPENM 



Number of DELETEs - Current OPENM 



Number of GETs and GETNs - Current OPENM 



Number of REPLACES - Current OPENM 



Number of Overflow Blocks Created - Current OPENM 



Number of Home Blocks in Use First Time • 
Current OPENM 



Number of Records in Home Blocks - Current OPENM 



Number of Records Placed in Overflow Blocks 
Current OPENM 



Total Number of CIO Calls 



Current PRU for Use by GETN 



Relative Data Block Word 
for Use by GETN 



Address of Buffer Catalog 



20 17 





1 

2 

3 

4 

5 

6 

7 

10 

11 

12 

13 

14 

15 

16 

17 

20 

21 

22 

23 

24 

25 

26 

27 

30 

31 

32 

33 

34 

35 

36 

37 

40 

41 



Length of Buffer Catalog 



60307400 A 



II-3-9 



FSTT(DAFILE) 



59 



29 



23, 



17 



LASBZBUF 

LASTSK 

BITMAPS 

WORDCT 

STRNGSP 

EMPTYSP 

AVAILSPC 

STRANGER 
ADDRPL 

RECLNGTH 

KEYBUFF 

OVERWRIT 
FWBVALUE 
LSTOP 
BCUPDT 

FSTTPOS — ' 



Most 
Empty 
Table 



ir 



Address of Last Accessed 
Data Block 



PRU Number of Last SEEK 



Address of Bit Map 
(Creation Run Only) 



Record Header of Record to be PUT 



Stranger Space in 
Receiving Block 



Empty Space in 
Receiving Block 



Empty Space in Block 
of Record to be Removed 



Stranger Space in Block 
of Record to be Removed 



File Position Undefined for GETN 



Unused 
Bits 



Record Length 



Address of Key 
Alignment Buffer 



Number PR Us after Last Block 



Address of User Buffer 



Last Operation Code 



BUFCAT Address of Last Update 



(Reserved) 
(Reserved) 



PRU Address of a Data Block 



Empty Space in the Block 



42 

43 
44 
45 

46 
47 

50 

51 
52 
53 

54 

55 
56 
57 
60 



66 
67 
70 



77 



II-3-10 
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SWAP FILE FORMAT 



Positive 
Field Length 



Job Field Length 



Control Point Area 



Dayfile FNT 



Dayfile FET 



Dayfile Buffer 



Control 
Word 



Checksum of Positive FL FNTs 



No. of PP Delay 
Stack Entries 



FL/100B 
After Swapin 



No. of FNTs 



PP Delay Stack Entries 
(5 words/entry) 



FNT Entries 



Jobname 



Checksum of Positive Field Length 



RA 



FLWords 



RA+ FL 
200 8 Words 

LE.FNT{3) Words 
1 Word 

LE.DFB Words 

1 Word 



— 



* A Words 

*B Words 

1 Word 
1 Word 
1 Word 



2 Words 
Minimum 



60307400 A 
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PUBLIC RMS AND DISK PACK LABEL (PRU 0) 



59 



47 



35 



29 



23 



17 



W.LBID 
W.LBDATE 



W.LBVID 



W.LBPFD 
W.LBR.BTC 



W.LBPRIV 
W.LBRBR 

W.LPAKNO 

W.LBCK 
W.LBFLAW 



V 



Creation Date 
Y Y D D 



VID (Right-justified, display zero filled) 



















PFD 



RB 



RBTC 



RB 



00 



VID of Current Pack (Right justified, display zero filled) 



Family Pack Name (Left -justified, binary zero filled) 



Q 



Random Family 
Bits Number 



VID of First Pack (Right-justified, display zero filled) 



RBR Ordinal 



Pack Number of Current Pack 
(Right-justified, display zero filled) 



Checksum of PRU 



RBR Header Words 



:\ Public Pack 

1 h 

( Private Pack 
\ Public Pack 

2 ! » 

f Private Pack 

■( Public Pack 

3 < Private Family Pack 

\ Private Sequential Pack 
Public Fack .""" 
Private Pack 



4 

5 

6 

7. 

10k 
"l 1s 



Public Pack & 
Private Family Pack 

Private Sequential Pack 



Public Pack Flaw Table (RBR Skeleton) 
Private Pack RBR Body 



n = Number of files in family (0 - 77 x ) if Family Number field = 
Not significant if Family Number field 1 



Public RMS Device labels can be more than 1 PRU. Possibilities are: 

1. If an RBR has more than 2160D RB-s, label is written on 2 consecutive PRU-s, of which each has 
half of RB-s along with label header. ......... . . , . . 

2. If a device has multiple RBR-s, each RBR occupies a PRU but the above (1.) holds true for each RBR. 



!l-3-f2 



60307400 A 



SECTION 4 
EXTENDED CORE STORAGE TABLES 



60307400 A IM - 1 



ECS FORMAT 



System 
Area 



Paged 
Area 



Direct 

Access 

Area 



Inter-Computer Area (ICC) 



System Pointer Area 



Flaw Table 



Empty Page Stack 
(Length Computed at Deadstart; 1 Word/Page in Paged Area) 



System Pages and Data Pages 



Direct Access 



IP.EICC 
IP.ESYS 
IP.EFLW+1 



60307400 A 
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47 



INTER-COMPUTER AREA 



23 





Length of System Area 


Length of ICC Area 




Size of ECS/1000B 


Library Size/1 000B 








(Reserved) 




? 








* 



14 
15 



Address 1st active system page 



ICC Areas (8 Words/Computer) 



II-4-4 
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SYSTEM POINTER AREA 



59 



47 41 



23 





Page Length 


Standard Buffer Length 


(Reserved) 




Current Number of 
Empty Pages 


Pointer to FWA of 
Empty Page Stack 




(Reserved) 


•; 






























■■ i, 





IP.ESYS>12 8 



59 51 



33 



9 



60307400 A 
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FLAW TABLE 



59 


35 




23 


17 







Maximum Number 
of Flaws 


Current Number 
of Flaws 


. 


■.. t < i Address of 
Flawed Page 






.-- ''■ 


■ 


........ 








-">*-'■"- "' ~ ,v "*' 


' '' ""*"■■" 



IF.EFLW+1 



SYSTEM PAGE 



59 



47 



41 



23 



Subpage 
Length 



Previous System 
Page Address 



Maximum Number 
of Subpages 



Current Number 
of Empty Subpages 



Next System 
Page Address 



First Empty 
Subpage Address 



System 

Page 

Header 



Subpages 
(Subpage Format Shown in CMR Section) 



II-4-6 
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COMMENT SHEET 



■2|- 
o 



CONTROL DATA 



TITLE: SCOPE 3.4 Installation Handbook 

PUBLICATION NO. 60307400 REVISION c 

This form is not intended to be used as an order blank. Control Data Corporation solicits your comments about this 
manual with a view to improving its usefulness in later editions. 

Applications for which you use this manual. 

Do you find it adequate for your purpose? 

What improvements to this manual do you recommend to better serve your purpose? 



Note specific errors discovered (please include page number reference). 



General comments: 



FROM NAME: POSITION: 

COMPANY 

NAME : 



ADDRESS:. 



NO POSTAGE STAMP NECESSARY IF MAILED IN U.S.A. 

FOLD ON DOTTED LINES AND STAPLE 



STAPLE 



STAPLE 



FOLD 



FOLD 



FIRST CLASS 
PERMIT NO. 8241 
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